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Introduction 


The purpose of this book is to introduce you to the key concepts of 
BASIC programming while inflicting as little pain as possible. 

This is a workbook to be used along with an ATARI® Home 
Computer. When you complete this book you should not only have a 
beginner’s understanding of the BASIC language, but also an introduction 
to ATARI Computer GRAPHICS and SOUND capabilities as well as 
other interesting ATARI Computer features. 

I have intentionally avoided flow charts, many unnecessary details, 
most exceptions to rules, and other traditional computer education 
approaches because, while they are necessary evils for the professional 
programmer, they can also have a tendency to alienate the beginner. 

Professional programming requires exacting and tedious attention to 
detail, but learning how to do elementary programs on a home computer 
is more of an adventurous and enjoyable exploration of the man-machine 
relationship. It is simply “No-Big-Deal” if you make a mistake while 
learning how to operate a home computer. Those who learn from their 
mistakes and master this book should be chomping at the bit for more 
advanced information and methods. A few may even develop the 
dedication to become professionals. But, first things first—Welcome to 
ATARI BASIC. 
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This book is designed to be used with either the ATARI 400 Home 
Computer™ or The ATARI 800 Home Computer™ 


along with the 
ATARI BASIC Cartridge. 


WHAT IS BASIC? 

a very popular computer language, which is easier to lei 


BASIC 































To insert the BASIC cartridge, first open the cartridge door by pulling 
the latch down and toward you. 

LATCHES 



Next, with the label facing you, push the cartridge slowly but firmly 
down into the cartridge slot. 

When you close the cartridge door, turn the computer on and your 
TV should look like this... 

























You might not have pressed the 
cartridge down firmly to the 
bottom of the slot. 



You probably do not have your 
computer’s 2-3 switch and the TV 
turned to the same channel. Try 
switching channels and also check 
your computer switchbox on the 
back of the TV to make sure it’s 
switched to “computer.” 


BOOT ERROR 
BOOT ERROR 
BOOT ERROR 
BOOT ERROR 
BOOT ERROR 
BOOT ERROR 
BOOT ERROR 
BOOT ERROR 


You probably have a disk drive connected and something 
elementary is wrong. For example, you could be using the wrong diskette 
or you might have left the disk drive door open. If you are just learning 
BASIC, you probably should turn the disk drive off. Turn the computer 
off, then on again. After introducing yourself to a little BASIC you can 
use your Disk Drive Manual to familiarize yourself with basic disk 
instructions. For starters work without a disk. 

NOTE: For any other problems or complete system set-up instructions, 
consult your owner’s guide. 
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• Fear not! Nothing you can type will damage the computer or your 
TV. 

• Making ERRORS is a natural part of learning to program. Everyor 
makes errors so you might as well get used to the idea. 

• It is normal for your computer to use UPPER-CASE letters. It will 
not accept instructions written in lower-case letters. 

• Also, when you get to the edge of the screen, just keep typing; the 
commiter will automatically “wran around” to the next line. 









Key Concepts 


Although your computer’s keyboard is very much like a typewriter’s 
keyboard, it has some special features. You need to learn about some of 
these features right away and others later. 

0 El _[I 

OBBHBBBHBIHiiBO mznmn 
ism QQBQODOOOQBBBH0 C2Ha 
□ OBQOBBOBBBBBii 
DBOQOQOOBBBOD twi 

0 0 


Here are a few keys you should know about right away. 
Try them out... 


|T1 E3EHnH33 This key will rub out any letter you type by accident. 

Type a few letters then “BACKSPACE” over them to get the idea. 
m This key will help if you get confused with what is 

happening on the screen. Until you get familiar with the keyboard, 
you might accidentally create a screen full of error messages or 
characters you don’t understand. To clear up a confusing screen and 
start from scratch, press . 

[~3~| When you press you are telling the computer that you are 

entering your information or answer. 

Just a brief reminder: 


NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 


UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 


THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
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NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 
NOTHING HAPPENS 


UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 
UNLESS YOU PRESS 


THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 
THE RETURN KEY 


[5] You will also be introduced to some two-key combinations which 
will require you to hold one key while pressing another. The first is 
the combination needed to print quotes. HOLD DOWN the 


| key and PRESS the 


key at the same time. 


[5] The 


key puts you into INVERSE VIDEO . Press it and type 


something. Press it again and you’re back to normal. 

[6] The key gives you lower case. Press it and type some lower- 
lower case, you have to 

NOTE: Inverse video and lower-case letters will be handy later, but as 
mentioned before, you should work in standard UPPER CASE when 
learning. 


case le tters. To get out of 
hold and press 
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READY 




When your computer says READY... 


What your computer is ready to do is take your orders. 

You will soon find, in fact, that the trick to writing BASIC programs 
is learning what orders to give your computer. 

One of the most common instructions you will use is obtained by 
typing the letters... 


PRINT 

which tells the computer that you want to print something on the screen. 

When you type PRINT and press the U=4iihl?l key, you’re telling the 
computer to print a blank line. 
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Performing Simple Calculations 


PRINT 4 + 4 

print 10-4 rmih i’i 


NOTE: No equal signs are 
needed. 





















Doing Multiplication and 
Division 


* * * GO FORTH AND MULTIPLY * * * 

The symbol for multiplication with your computer is the asterisk * 
which is made by pressing the a key. 


These will not work... 

PRINT 5X7 
PRINT (5) (7) 
PRINT 5*7 


This will work... 
PRINT 5*7 U 


will give you an answer of 35. 


/ / / DIVIDE AND CONQUER / / / 


The symbol for division with the computer is the slash / produced by 
pressing the key. 


PRINT 99/3 na 


will give you an answer of 33. 


****** IS THE SYMBOL FOR MULTIPLICATION 
//////// IS THE SYMBOL FOR DIVISION 
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Printing Letters, Words, and 
Characters 


PRINT "4+ 4" CS2SH3 

print "4*4" eki 
print "i8-4" csinna 

PRINT "HELLO FRED" liUMI 



Anything inside of quotes “ ” \> 
be printed directly. 


The result is printed without 
quotes. Trying to print quotes on 
the screen is possible, but will 
give the beginner a mental hernia. 



NOTE: You can abbreviate PRINT using a ? but beginners probably 
will understand their program listing better if they spell out PRINT in 







Direct Mode and Programming 
Mode 

With your computer, you can either DO IT NOW or DO IT LATER. 


Direct Mode 

Instructions such as PRINT “HELLO” U31MI are executed as soon 
as B3EEU is pressed so they are said to be in the DIRECT or 
IMMEDIATE mode. 

The DIRECT mode is useful for getting quick answers and 
experimenting to see how the computer will react to a certain instruction. 


Programming Mode 

A program is an instruction or a series of instructions which are not 
executed until you type RUN 

Every time you type RUN, the program is executed again. 
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This Is a Program 


10 PRINT "HELLO" 
RUN 


1:1^11:1!! 
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Related to 
Line Numbers 



Each group of instructions in a program is preceded by a line number. 
Unless instructed otherwise, the computer starts executing the program at 
the lowest line number and works toward the highest. 

10 PRINT "HELLO" 

20 

30 


Instead of numbering their lines 1, 2, 3, etc., most people like to leave 
room for inserting new lines later so they number them something like 10, 
20, 30, etc. 


More About Program Lines and 
Line Numbers 


Replacing Lines 

The easiest way for beginners to change a line is to type it over again. 
The new line will replace the old line. 

10 PRINT "HOW ARE YOU THIS FINE DAY" (OLD LINE) 

10 PRINT "HI" IMIII (NEWLINE) 

As long as you use the same line number, even a shorter line will replace 
the original one. 


Erasing Lines Completely 

There’s nothing to it. Type the unwanted line number and press gjjggjzi 
10 gam Does away with line 10. 


The 3 Line Maximum 


When writing programs, you need 
a new line number for every 3 
lines printed on the screen. 

10 PRINT "YOU CANNOT PRINT MORE THAN 3 
LINES OF INFORMATION ON THE SCREEN WIT 
HOUT ADDING A NEW LINE NUMBER" 

20 PRINT "THAT IS WHY LINE 20 WAS ADDED 
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You’ve Had it Too Easy so Far 


You will find that it soon becomes second nature to press the key 

after making entries. 

In order to make program listings and instructions less complicated 
for you to read, from this point forward, liUHhlM key instructions usually 
won’t be shown. 


THIS IS NOT A COLD-TURKEY W ITHDRAWAL, HOWEVER. 
HERE ARE A FEW MORE RETURNS JUST TO TIDE YOU OVER. 

RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
RETURN RETURN RETURN RETURN RETURN RETURN 
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REMark Statements 

THESE HELP YOU AND OTHER PEOPLE UNDERSTAND 
YOUR PROGRAM. 


10 PRINT "HELLO" 

20 REM THIS IS AN INCREDIBLY DULL PROG 
RAM WHICH SHOWS THE COMPUTER SAYING HE 
LLO 



If you type a line number and 
follow it with REMARK or REM, 
you can then type three lines of 
information which won’t affect 
the program’s operation. 
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LIST or L. 

LIST 

To list the entire program, 

^ type LIST. 

Hill 

WWW \ 

1 0| ATARI soon [ \ 

























Listing Parts of Programs 


When you start working with longer programs, there will be times when 
you want to list just a single line or only a few lines of the program. 

To list a single line of a program, type LI ST and add the line 
number before pressing EHESI • 

LIST 20 Only line 20 will appear on the screen. 

20 REM THIS IS AN INCREDIBLY DULL PROG 
RAM WHICH SHOWS THE COMPUTER SAYING HE 
LLO 


In order to list a range of program lines, type... 



The first program Don’t forget The last line 

line you want goes to use a comma. you want to see 

here. goes here. 

THIS WILL LIST LINES 10 AND 20 AND ANY LINES THAT 
WOULD HAVE BEEN BETWEEN THEM. 

10 PRINT "HELLO" 

20 REM THIS IS AN INCREDIBLY DULL PROG 
RAM WHICH SHOWS THE COMPUTER SAYING HE 
LLO 

Later, as you work with longer programs, you will appreciate this partial 
listing flexibility. 

To list a program on a printer, type... 

LIST "P: 
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Use LPRINT to Print on Paper 


10 LPRINT "HELLO" 

20 REM THIS IS AN INCREDIBLY DULL PROG 
RAM WHICH SHOWS THE COMPUTER SAYING HE 
LLO 



Use an LPRINT (LINE PRINT) 
command for obtaining a hard 
copy. 


NOTE: You cannot use LPRINT without a printer. If you try to do so 
you will get an ERROR message #138, which means you printed without 
a printer. What could be simpler? 




END 


30 END 



Some types of programs require 
an END statement to be placed 
where you want the computer to 
stop computing. It is not always 
necessary on the ATARI 
Computer, but it is good to be 
aware of it so you can use it later, 
when you need it. 
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NEW will erase your program. 
No second chances. 



NOTE: Turning off your computer or opening the cartridge door will 
also erase your program. Turning off the TV will not affect it, however 












POSITION or POS 


POSITION tells the computer where to start printing on the screen. 

Imagine that your screen is divided into 40 blocks across and 24 
blocks down. 

If you don’t use a POSITION statement before a PRINT, the 
computer automatically indents two spaces and starts printing on the line 
below the one it just finished. 

With POSITION, always give 


POS. 10, 14 



The number of 

then a comma 

and the number 

spaces across 


of spaces down 

first 


last. 


In a program, POSITION is used as follows... 


10 POSITION 0,0 
20 PRINT "HI" 

30 POSITION 35, 0 
40 PRINT "THERE" 
50 POSITION 16, 11 
60 PRINT "MIDDLE" 


Before you run this, press SYSTEM RESET to clear the screen. Later you 
will learn more efficient ways to get unwanted words out of your 
display. 
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For technical reasons, computers’ internal numbering systems use 
first number instead of 1. 

For example, if a computer had 12 graphics levels, they woul 
numbered 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, and 11. 

As used with POSITION... 



40 spaces across are numbered 0 through 39. 
24 spaces down are numbered 0 through 23. 





Operators 


English teachers are all dishonest. They told you that these... 


■ j y were punctuation marks! 

THEY’RE OPERATORS 


The Colon ! 

You can use a colon to put more than one instruction in a program line. 
This enables you to: 

• Save Time. 

• Save Memory. 

• Organize Your Program Better. 

• Occasionally Screw Things Up Incredibly. 

Type in NEW then the following one-line program. Notice that 

you have condensed three instructions into one line. 

10 PRINT " I AM ABOUT TO PRINT IN THE M 
IDDLE OF THE SCREEN" : POSITION 6, 11: PRI 
NT "MY DESTINY HAS BEEN FULFILLED" 


Here’s a common pitfall: 

10 REM THIS IS THE FIRST LINE OF THE S 
TOCK PROGRAM: PRINT "STOCK AND BOND ANAL 
YSIS" 

Nothing following a REM statement is recognized. When learning 
BASIC, keep REMs isolated on separate lines. 
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The Comma , 

The comma helps you organize your output into columns. When you put 
commas in between printed items, the computer will put the words or 
numbers into columns which are ten spaces apart. 

10 PRINT "ATARI", "TEA", "AND", "ORANGE" 


20 PRINT 

" 1" , " 2' 

\ "3", 

"4" 

ATARI 

TEA 

AND 

ORANGE 

1 

2 

3 

4 


NOTE: Information on how to change the spacing between columns can 
be found in the section on PEEKS and POKES. 


The Semicolon \ 

This operator allows us to join things together. 

Try this program first without and then with the SEMICOLON. 

10 PRINT "HELLO " ; 

20 GOTO 10 


NOTE: Pressing the TTTf key will stop BASIC programs like this. 
Typing CONT will make the program CONTINUE again. 



10 PRINT "GOLDPRICE= " ; "$385.98" 
WILL PRODUCE. . . 

GOLDPRICE = $385.98 


Why you do such a thing will become apparent soon. 
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Error Messages—The Best 
Friends You’ll Ever Hate 


ATARI Computers give you two very useful types of ERROR 
MESSAGES. 

The first is displayed when you type a line without proper 
punctuation, legal operators, or anything else that doesn’t make sense to 
the computer. 

Here are some common slips... 

PRIMT “HELLO” 

produces 

ERROR—PRIMT QD HELLO” on clear inspection, you will 

notice that PRINT is spelled 
wrong. 


When you get this type of error message, the computer puts a marker on 
top of the first area in question not the error itself. After some practice 
you’ll spot what the computer doesn’t like. 



PRINT HELLO” 

produces ERROR—PRINT 
HELLO □ 

print “hello” 

produces ERROR—fplrint 
“hello” 


PRINT is spelled correctly, but 
there’s no quotation mark before 
the H in HELLO. 


Remember you can’t use lower 
case letters for commands. 
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POS.2.5 : PRINT “HELLO” 

ERROR—POS.2.5(7] PR I NT 
“HELLO” 

POS 2,5:PRINT “HELLO” 

ERROR—POS[2],5:PRINT 
“HELLO” 

10 “PRINT HELLO” 

10 ERROR— CD PRINT HELLO” 


Plow unforgiving, you used a 
period (.) instead of a comma 
between the 2 and 5. 


RATS! You got the comma right 
but left out the period (.) after 
POS. 


A Freudian slip; you put the 
quotation mark in front of the P 
instead of the H. 
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Program Error Messages 


Assuming you have typed in your program, but there’s something 
illogical about it, you will then get another type of ERROR MESSAGE 
when you try to RUN the program. 

This error message will give you an ERROR type specified by a 
number and then indicate the line at which the computer had trouble 
executing your program. 

When you get an error message with a line number, such as... 

10 LPRINT "HELLO" 

RUN 

ERROR 138 AT LINE 10 


First look at the line specified for obvious mistakes. 

Then look up the type of ERROR. The more common errors are 
listed in the back of this book. If you don’t find it there, consult your 
ATARI BASIC Reference Manual for a full listing. 

In the above case, an ERROR 138 indicates a “Device Time Out.” 
Someone used an LPRINT command without turning on their printer. 

By the way, this may seem like a lot of trouble, but most computers 
give you a lot less help finding problems! 
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Three Math Tips 


Math Tip #1 



Computers use abbreviated forms of very large and very small numbers. 
The easiest way for a beginner to deal with this is to: 

Avoid Using Very large or 
very small numbers! 



Assuming you are #3, here is a brief summary of how to translate this 
abbreviated notation into ordinary human notation. VERY LARGE 
abbreviated numbers have: 

1. An “E”- 

2. A “+” sign-- 

3. A number after the plus (+) sign 


3t! 


: + li 

y 1 



To convert a VERY LARGE abbreviated number such as: 


3.7E + 11 


1. Write the number up to the E 

3.7 

2. Start at the decimal point and count, to the right, the number of 
places indicated by the number after the plus sign (in this case, 
“ 11 ”). 


3.70000000000 

Old decimalNew decimal 
place Add as many zeros place 

as necessary 

370000000000. 

This is the number the computer abbreviated as 3.7E + 11 


very small abbreviated numbers have: 


2j531E^04 

2. A sign ^^-3. 


A number after the 
minus (-) sign 


To convert a vEflvsA/A/./. abbreviated number such as: 

2.831 E - 04 

1. Write the number up to the E 

2.831 

2. Start at the decimal place and count, to the left, the number of 
places indicated by the number after the minus sign (in this case, 



New decimal^ '—I ^-Old decimal 

place Add as many zeros place 

necessary 


This is the number the computer abbreviated as 2.831E - 04. 


Math Tip #2: Order of Execution 

The computer calculates mathematical expressions in a certain order. 
Calculations of the same type or of equal priority are performed from 
left to right. 


1. ( ) —Everything inside parentheses comes first, then 

2. A — Exponentiation , or raising a number to a power, sue! 

as: 5 A 3 which = 5 times 5 times 5 or 5 3 or 125, then 

3. * —Multiplication an d-__ Performed in order of 

/ —Division -occurrence from left to right 

then 

4. + —Addition and- -_ performed in order of 

—Subtraction -^occurrence from left to right 

Examples: 

Look what a difference this can make... 

9*4+3= 39 
but... 

9 * (4+ 3) = 63 


but... 

(62 - 3)* 8 = 472 


When in doubt, put parentheses around what you want do 



Math Tip #3 


I 

Remember when Mrs. Grundle, your 5™ grade teacher, taught y 
to write numbers with a comma after every three places? 

1,000,000 = one million (according to Miss Grundle) 

WELL, GET WITH IT MRS. GRUNDLE!!! 

COMPUTERS DON’T USE COMMAS!!! 

1000000 = One million (according 
to your computer) 



More Key Information 


BIBBBBBHB8BB6BB 

fiSBOBBBBBBBBBBO 



The Magic of the CONTROL (CTRL) Key 


I key you can really get control of 


Once you learn how to use the | 
your computer display. 

The key is always held down while pressing another key. 

For instant gratification, hold down the key and press 

the key. 

This section is going to concentrate on using the JSjJ key for 
editing programs and changing your screen display. 

Remember, when you see you should hold the control key 

down while pressing the other key. 

Use the following steps in order to: 

A. Move the cursor (screen marker) without changing the text on the 

screen. 


B. Insert and delete words and spaces. 
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1. Start by typjng a program line. 

10 PRINT "HELLO JOHN" 


iWlliiiifnlilVmtjr-\ 




2. Now press the following... 


SB until you have put the 


cursor back on top of the 1. 

3. Now press and hold the down until the cursor is on 

top of the J in JOHN. If you went too far you can use 

a to back up or keep going with yQ and 

let the cursor wrap around the screen. 

Notice that your program line remains intact. It would have been 
wiped out if you had not been holding the key down. 

4. Release the key when making your changes. With the 

cursor on top of the J, take your finger off the key and 

change JOHN to MARY. Press and the change is 


5. Now, use the and arrow keys as before only this time stop 

between HELLO and MARY. 

10 PRINT " HELLO.MARY" 




6. Press the I 


I and the I 


key on the top row of the 


keyboard. Spread the words out by inserting spaces—even down to 
the next line if you want. You can hold and Oft down to insert 

a lot of spaces. 

7. Press the space bar once and type the word you want to insert. 


10 PRINT "HELLO TYPHOID- 


8. Holding down and using the CHEBZSB key wi ^ bring 

MARY back next to TYPHOID. 

9. Don’t forget to press or the changes won’t be made in the 


EUaUnSB keys can be very absorbing. Try 


Use and the a °d ifll keys to place the cursor on top of 

the T in line 10. 


computer’s memory. 


Using the I 
this... 


10 PRINT "HELLO[T]YPHOID MARY" 

Now press GHESEiEEB and watch TYPHOID being absorbed 

into the cursor. 

If you don’t press IJAMEI after you have made your changes then only 
the screen display was changed and not the program line in the 
computer’s memory. If you press (JJJJUJJ you will get rid of the 
TYPHOID in MARY forever. 


FINAL ADVICE. You’re probably going to make a few mistakes as you 
get control of the key. For instance, you may accidentally 

press fWl instead of . But after some practice, 

you will really appreciate these screen editing features. 
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These are variables, not vegetables: 


A SUM MONTH GROUPSIZE 

ANUM A$ 

NAMES KOLORONE 

ANSWER4 AGE SCORE 

ZONK 


A variable is anything that can change or vary. Here are some 
familiar variables: 


A musical note Your age 

The color of a TV screen The rate of inflation 

The price of gold 

When using the computer, we usually assign variables names to help 
us remember what they stand for and to work with them. The price of 
gold might be called GOLDPRICE or GPRICE or PRICE or GOLD or G 
or BANANAPRICE. The computer could care less what you call it. 

HINT: Don’t leave any spaces in the variable name. GOLDPRICE not 
GOLD PRICE. 
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After we have a name, we need a value for the variable. 

LET GOLDPRICE = 395.63 

This would tell the computer to give the variable called GOLDPRICE a 
value of 395.63. 

Now, tell it to PRINT GOLDPRICE and it will give you a value of 
395.63. 



ALSO NOTE: The computer starts out giving a value of zero (0) to all 
variables. 

TYPE THIS: PRINT ZONK—It will show you that ZONK is 0 until you 
tell the computer otherwise. 
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Numeric variables 

You put numbers in numeric 
variables: 

GOLDPRICE = 395.63 
AGE = 22 
SPEED =120 


String variables 

You put words or characters in 
these: 

NAME$ = "JOHN DOE" 
MONTH $ = "MAY" 

PLACE$ = "EGYPT" 

A$ = "NANCY" 
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Two Important Things About 
String Variables 


1. YOU MUST first tell the computer how many spaces to reserve for 
your string variable. That is done with a DIMENSION statement. It 
goes like this: 

10 DIM NAME$(8) 

This means you can have as many 
as eight characters in your name. 
“BOB” would fit. 

“BETTY” would be fine. 

“FRANZ SCHUBERT” would be 
unfinished. 

2. The other important thing is to remember to put QUOTES around 
your STRINGS. 

10 DIM A$(20b«—We’re allowing more room 
20 LET A$ = aFRANZ SC HUBERTH 

"- 1 Don’t forget to use quotes here 

30 PRINT A$ 
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INPUT 


A statement which gives the computer a great deal of flexibility is 
INPUT. INPUT is used to make the computer ask you a question and it 
lets you enter your own answer. 

Here is an example of how INPUT is used in a program: 

10 DIM DOG$ (20) 

20 PRINT "WHAT KIND OF DOG DO YOU OWN" 

30 INPUT D0G$ 

40 PRINT "A " ; D0G$; " IS A GOOD DOG" 

Things to Remember About Input 

I. It is usually used with a prompt which guides the user to type in the 
correct information. 



This is the prompt: 


20 PRINT "WHAT KIND OF DOG DO YOU OWN" 


2. You do not need to put a ? at the end of your prompt. The INPUT 
statement will do that for you. 

3. If you INPUT a string variable you need to DIMension it first. 
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FOR / NEXT Loops 


The FOR/NEXT loop is like an oreo cookie. 


At the end of 
the loop- 


In between them is the cream of the program, or what you want to 
repeat by using the loop. Here’s what is in the FOR part: 



BpeS 


The variable name comes the lower Then comes the upper 

comes after the FOR limit (what X will be equal limit (what X will be 


to when the loop begins). when the loop i: 

completed). 



Any legal BASIC statement or group of statements can go here. 




This has to be the same variable name used in the FOR part of the loop. 





Here’s the program again: 


10 FOR X=1 TO 20 

20 PRINT "THIS IS THE CREAM" 

30 NEXT X 

Run this. Then, add this... 25 PRINT X 

As you can see, the value of X is increased by 1 each time through the 
loop. 

Change line 10 to... 10 FOR X = 1 TO 20000 
...and see who gets bored first, you or the computer. 




There is a way to make the computer skip a specific amount of numbers 
each time through the loop: 


10 FOR Z = 0 TO 100 ( STEP 5 ) 
20 PRINT Z 
30 NEXT Z 


This tells the computer to count 
only every 5th number between 0 
and 100. 


You can also go backwards... 


10 FOR Z = 100 TO 0 
20 PRINT Z 
30 NEXT Z 



Don’t forget the - (minus) sign 
when going from high to low 





Using the FOR/NEXT Loop to Delay the Computer... 

Sometimes the computer works too fast!!! Here, for example, is the 
computer saying HELLO 43 times... 



WANT TO SEE IT AGAIN? 

To slow down a display, or anything else the computer does, you can use 
a FOR/NEXT loop with nothing, between the FOR and the NEXT. 

10 PRINT "GOOD" 

20 FOR DE= 1 TO 500 
30 NEXT DE 
40 PRINT "MORNING" 

When you use a blank FOR/NEXT loop, you are making the computer 
go through the loop and do nothing each time through. 

“Computer—go chase your own tail for a count 
of 500.” 


Try experimenting with different values in line 20 and observe the effect. 




Nesting FOR/NEXT Loops... 



When you nest a FOR/NEXT loop, you put one inside of another. You 
can do this as much as necessary, BUT, you have to build your FORs and 
NEXTs from the inside out... 


This will never do 




This is a final sample: 


10 FOR Y=1 TO 3 
20 FOR K= 255 TO 0 STEP -5 
30 SOUND 0, K, 10, 10 
40 PRINT K 

50 FOR Z = 1 TO 30: NEXT Z: REM DELAY 
60 NEXT K 
70 NEXT Y 


[f you can’t hear anything, turn up t 


volume on your TV. 





Even More Key Concepts 


Here are two more keyboard control screen editing features which you 
may find useful: 


. How to temporarily stop many BASIC programs and how to 
interrupt and observe parts of a long program listing. To stop the 

program or listing hold and press . To restart the 

display, hold and press U again. Try this with a program 

such as 10 PRINT "HELLO" : GOTO 10 


II. How to duplicate lines. Sometimes you might build on to your 
program so much that you box yourself in and need to renumber. 
Almost as frequently, you might need to repeat a line you already 
have or use a similar line in another part of a program. Instead of 
retyping the whole line, clone the one you already have and make 
the necessary changes. 

This is all you need to do in order to clone program lines... 


30 FOR DELAY = 1 TO 50: NEXT DELAY 


Let’s suppose you have this perfectly wonderful delay loop and you want 
one of the exact same loops at line 70 and at line 90. 


, Hold down and use to position the cursor on 

the 3 in 30. Lift your finger off of the key and type 


top of 
a 7 on 


top of the 3 and press BBSP Nothing else will appear to have 
changed. Now go back up one more time and change the 7 to a 9 

2. LIST the program to reveal 


30 FOR DELAY = 1 TO 50: NEXT DELAY 
70 FOR DELAY = 1 TO 50: NEXT DELAY 
90 FOR DELAY = 1 TO 50: NEXT DELAY 
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GOTO 


GOTO is pretty straightforward (and is probably one of the single 
greatest computer discoveries you will encounter). 

10 PRINT "SOMEONE PULL THE PLUG" 

20 GOTO 10 



Rip Van Programmer 



Steppers—Counters 
Accumulators 


STEPPERS change the value of a variable each time through the loop. 
Used as a COUNTER, they count how many times you’ve been through 
the loop. 


This is called initializing a - 

variable (giving it an initial 
value) 

This is not a type of algebraic 
equation. 

It really stands for: Let the 
current value of X be increased 
by one. 


ACCUMULATORS keep a 
running total for you. 


10 X=1 
20 PRINT X 



10 REM UNBALANCED CHECKBOOK PROGRAM 

20 REM NUM IS THE CHECK NUMBER 

30 REM AMT IS THE CHECK AMOUNT 

40 REM TOT IS THE ACCUMULATED TOTAL 

50 NUM=l: AMT=0: TOT=0: REM INITIALIZING 

VARIABLES 

60 PRINT "ENTER AMOUNT OF CHECK # " ; NU 
M; : INPUT AMT 

70 NUM = NUM + 1: TOT = TOT + AMT 

80 PRINT : PRINT "YOU ARE $" ; TOT; " IN D 

EBT" 

90 PRINT : GOTO 60 
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30 GOTO 10 


By combining the GOTO with the conditional branch produced by the 
IF/THEN, see what is now possible: 

NOTE: This is an example—not a 
10 SALT THE WATER real program. 

20 TASTE THE WATER - 

30 IF SALT CONTENT = . 9 PARTS PER MILLION 
THEN PRINT "GOSH! THIS TASTES GOOD. " : GOTO 50 
40 GOTO 10 

50 COOK FOR SEVEN MORE MINUTES 
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The IF/THEN decision capability is really the key to the whole business 
of BASIC programming. Of course, since it’s the key, you have to insert it 
properly. 



There are only two 
ways to look at it. 
The comparison 
is true or it is not. 


IF A>B THEN 

means (IF A IS GREATER THAN B) 

IF A<B THEN 

(IF A IS LESS THAN B) 

IF A=B THEN 
(OBVIOUS) 

IF A <= B THEN 

(IF A IS LESS THAN OR EQUAL TO B) 

IF A >= B THEN 

(IF A IS GREATER THAN OR EQUAL TO B) 

IF AOB THEN 

(IF A DOES NOT EQUAL B) 

IF A=X AND B=Y THEN 
IF A=X OR B=Y THEN 


If the computer finds the comparison true, it will do whatever follows 
THEN. 

10 IF A>B THEN PRINT "A IS BIGGER" 

If the comparison is not true, the program drops through to the next line. 
20 PRINT "THEN A MUST BE CTHAN OR = TO B" 


10 PRINT : PRINT "WHAT IS YOUR AGE" 

20 INPUT A 

30 IF A>95 THEN PRINT "WELL, NOT EXACTL 

Y A SPRING CHICKEN" I GOTO 10 

40 PRINT "OH, AN INEXPERIENCED YOUTH! " 

50 GOTO 10 
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Using the IF/THEN 


In the following program, the computer checks to see if you put in the 
number 25. If you didn’t, it will give you another chance. 


10 REM ONLY 25 WILL WORK 
20 PRINT "ENTER A NUMBER" ; : INPUT A 
30 IF A <0 THEN PRINT "NOT A VALID NUMB 
ER" : GOTO 90 

40 IF AC1000 THEN PRINT "IT'S WITHIN 0 
UR RANGE" : PRINT : GOTO 60 
50 PRINT "THIS NUMBER IS OUT OF OUR RA 
NGE" : GOTO 90 

60 PRINT "CHECKING NUMBER" : FOR DE = 1 TO 
400: NEXT DE 

70 IF A<>25 THEN GOTO 90 
80 PRINT : PRINT "RIGHT YOU ARE! " : END 
90 PRINT : PRINT "TRY AGAIN" : PRINT 
100 GOTO 20 
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Don’t forget STRING comparisons: 

IF CITY$ = "BUFFALO" THEN PRINT "AT 
LAST, I ' VE FOUND A DECENT PLACE TO 
LIVE! " 


10 DIM NAME$ (30) 

20 PRINT "WHAT IS YOUR FIRST NAME" ; 

30 INPUT NAME$ 

40 IF NAME$ = "JANET" THEN GOTO 60 
50 GOTO 20 

60 PRINT : PRINT "WELCOME TO THE SYSTEM 
,";NAME$ 



and, we can combine STRING 
and NUMERIC comparisons... 


10 DIM NAME$ (30) 

20 PRINT "WHAT IS YOUR FIRST NAME" ; 

30 INPUT NAME$ 

40 IF NAME$ = "JANET" THEN GOTO 60 
50 GOTO 20 

60 PRINT : PRINT "WELCOME TO THE SYSTEM 
,";NAME$ 

70 PRINT "WHAT IS YOUR ACCOUNT # " ; 

80 INPUT ACC 

90 IF ACC = 472 THEN GOTO 110 

100 PRINT "INVALID NUMBER, TRY AGAIN" : 

GOTO 80 

110 PRINT : PRINT "ACCEPTED" 

120 PRINT "CHOOSE YOUR TRANSACTION" 
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ON/GOTO 


ON/GOTO allows you to do a number of comparisons very easily. Here 
is the ON/GOTO format: 


ON X 

GOTO 


any/* 


'7^' 

numeric 

the line that 

the line that 

variable 

would be executed 

would be executed 


if X=1 

if X=2 


if X=3 


EXAMPLE: 


10 PRINT " 1 = LINE 100" 

20 PRINT "2 = LINE 150" 

30 PRINT "3 = LINE 200" 

40 PRINT "4 = LINE 250" 

50 PRINT : PRINT "PICK YOUR NUMBER AND 
PRESS THE RETURN KEY" 

60 INPUT X: IF X>4 THEN GOTO 10 
70 ON X GOTO 100, 150, 200,250 
100 PRINT "THIS IS LINE 100" : GOTO 300 
150 PRINT "THIS IS LINE 150" : GOTO 300 
200 PRINT "THIS IS LINE 200" : GOTO 300 
250 PRINT "THIS IS LINE 250" : GOTO 300 
300 PRINT : FOR DELAY = 1 TO 200: NEXT DEL 
ay: RUN 


This is great for multiple-choice 
type inputs. 


\ 


NOTE: When the computer 
encounters RUN within a 
program, it will start the program 
from the beginning. 
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GOSUB and RETURN 


GOSUB and RETURN are close cousins to the GOTO statement, but 
there is one important difference: 

A GOSUB keeps track of where it left off, and, when it encounters a 
RETURN, it goes back to the next item on the program agenda and 
executes it. 

For example: 

10 PRINT "HELLO" 

20 GOSUB 100 
30 PRINT "GOODBYE" 

40 END 

100 FOR Z=1 TO 10 I PRINT "GLAD TO SEE Y 
OU" : NEXT z: RETURN 

Now, add another line. 

5 PRINT "GOOD MORNING" : GOSUB 100 



NOTE: The END in line 40 is necessary to prevent the program from 
crashing into line 100. 




In the following program, which calculates an average, the 
“SUBROUTINE” adds the new number to the total. 

10 PRINT "HOW MANY NUMBERS TO BE AVERA 
GED"; 

20 INPUT N 

30 FOR Z = 1 TO N 

40 PRINT "ENTER NUMBER " ; Z; 

50 INPUT NEWNUM 
60 GOSUB 200 
70 NEXT Z 
80 AVE = T0T/N 

90 PRINT : PRINT "THE AVERAGE IS" ; AVE 
100 END 

200 TOT = TOT + NEWNUM: RETURN 

Of course, this could have been done without a SUBROUTINE; but 
keep in mind, we could have added innumerable calculations betwee 
line 200 and the RETURN. 




ON/GOSUB 


ON/GOSUB is very much like ON/GOTO. However, the ON/GOSUB 
branch contains a RETURN and the ON/GOTO does not. Here’s an 
example of ON/GOSUB: 

10 REM ONGOSUB 

20 PRINT : PRINT "QUESTION 1" 

30 PRINT "WHAT IS THE SQUARE ROOT OF 2 
5" 

40 INPUT SQ: IF SQ= 5 THEN REFORC = INT (RN 
D (0) *3) + l: ON REFORC GOSUB 1000, 2000, 30 
00,4000: GOTO 70 

50 PRINT : PRINT "TRY AGAIN": GOTO 30 
60 REM ONLY TWO QUESTIONS IN SAMPLE 
70 PRINT : PRINT "QUESTION 2" 

80 PRINT "HOW FAR IS IT IN MILES TO TH 
E SUN" 

90 INPUT SD: IF SD= 93000000 THEN REFORC 
= INT (RND (0) *3) +1: ON REFORC GOSUB 1000, 

2000,3000,4000:GOTO 110 

100 PRINT : PRINT "TRY AGAIN" : GOTO 80 

110 PRINT : PRINT "ETC. ": END 

1000 PRINT "GREAT WORK! " : RETURN 

2000 PRINT "GOOD GOING! " : RETURN 

3000 PRINT "ANOTHER EINSTEIN! ": RETURN 

4000 PRINT "CORRECT AGAIN" : RETURN 


In this example, the computer selects, at random, one of four reinforcers 
if a person gets the answer correct. 

NOTE: For more information on how to use random numbers, consult 
the section on FUNCTIONS. 
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READ/DATA 



40 GOTO 10 


Computers do not read for 
enjoyment; they must be 
instructed to read. Fortunately, 
there’s not much of a trick to this; 
you simply have to tell the 
computer in a straightforward 
manner to... 

READ X (any numeric 
or string 
variable name) 


The computer will find the value of X in the DATA statement. 
DATA 5,10,15,20,25 

Commas are used to separate values in data statements. 

Used in a program, it can look like this: 


No comma used here 

L 


10 READ X 

20 PRINT X: IF X= 25 THEN END 
30 GOTO 10 

40 DATA 5, 10, 18,200, 25 

_t_X. 


The POINTER is very finicky and does not lose track of which value of 
X it is reading. 


The pointer starts at the first 
position following DATA. 

40 DATA 5, 10, 18, 200, 25 

^_ The second time through the 

loop, the next value is pointed to 

40 DATA 5, 10, 18, 200, 25 

- 60 - 





If you run out of room for DATA values, you can create a new DATA 
line. 

10 READ X 
20 PRINT X 
30 GOTO 10 

40 DATA 5, 10, 18,200, 25 

50 DATA 34,44,5,56,2,344,333,5,5,666,2 
, 2,37, 86, 5, 84, 35, 66, 6,88,57,7777,33,3, 
333,9,4, 7,34,85,3,44,46,3,6,3,6,9 
60 DATA 2,34,55,66, 77, -1 

Imagine assigning all of those values using LET statements! 

As mentioned earlier, the POINTER is very picky, and if you run or 
of DATA, it will show its displeasure.... 

"ERROR-6 AT LINE 10" or some such nonsense 

will be the result of the POINTER pointing to thin air, instead of a value 
for the variable. 

The standard way to deal with this is to use a piece of DATA called 
a FLAG in combination with an IF-THEN statement. 




A FLAG is a variable in a data statement which is very unlikely to occur, 
unless it is placed there intentionally. It is put at the end of a DATA 
statement to let the computer know it has reached the end of the DATA 
statement. 

This is an example of a flag within a program using a DATA 
statement: 

10 REM MPG = MILES PER GALLON 
20 READ MPG 

30 IF MPG= 470 THEN END -Here’s the test for the flag. 

40 PRINT MPG; " MPG" 

50 DATA 10, 20, 15, 60, 40, 470-«- Unlikely mpg 
60 GOTO 20 


RESTORE 


Before leaving READ and DATA, a few more issues must be covered. 
RESTORE, for example, will set the pointer back to the beginning. 

Not only is this often incredibly handy, but it’s necessary in 
programs such as the inventory program listed further on. 

In this sound program, line 20 instructs the computer to “RESTORE” 
and go back to the beginning of the data when it reaches the flag—888. 

10 READ X 

20 IF X= -888 THEN RESTORE : GOTO 10 
30 SOUND 0, X, 10, 10: PRINT X 
40 FOR DELAY = 1 TO 40: NEXT DELAY 
50 GOTO 10 

60 DATA 23,55,76,33,6,4,200,165,20,3,4 
5,55,76,23,78,-888 


Remember to turn up the volume on your TV. 


WAIT, THERE’S MORE. 
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You can add a specific line number to the RESTORE statement... 
RESTORE 3000 

This instructs the computer to set the pointer to the first value in the data 
statement on line 3000. Of course, there’s even more! 

The computer can keep track of multiple variables. 


10 

20 

30 

40 


READ X,Y 
PRINT X,Y 
GOTO 10 
DATA 5 10, 8, 9, 7, 6" 

/ 


These are values for Y 


The se are values for X 


AND MORE!!! You can use STRINGS in DATA statements. 


10 DIM NAME$ (20) 

20 READ NAME$ 

30 IF NAME$ = "COTTAGE CHEESE" THEN END 


40 PRINT NAMES 
50 GOTO 20 

60 DATA DIANE,DAVE,TOM,MARIE,COTTAGE C 
HEESE 


Finally, you can use both NUMERIC and STRING variables in the 
same READ statement. Here’s a simple inventory program: 

10 REM PN = PARTNUMBER AND P$ = PARTNAME 
20 DIM PART$(20),P$(20) 

30 PRINT "WHAT IS THE NAME OF THE PART 
" : INPUT PARTS 
40 RESTORE 
50 READ P$ , PN 

60 IF P$= "FROG" THEN GOTO 90 
70 IF P$=PART$ THEN PRINT "THE PART NU 
MBER IS " ; PN: PRINT : GOTO 30 
80 GOTO 50 

90 PRINT "NO SUCH PART" : PRINT : GOTO 30 

100 DATA WHEEL,1234,BOLT, 2345,SPOOL,34 
56,LATCH,5678,COG,6789, FROG,7890 
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Many times you want to put words and characters on the screen without 
having the READY and the cursor left in the display. 

To clear the screen in the beginning of a program, start with a rather 
strange sequence of keystrokes... 

5 PRINT " If." 

s 

To get this arrow, press once, then hold down and 

press . Then close the quote. 


This instruction tells the computer to start your program by clearing 




Try... 5 PRINT " f " 
10 GOTO 5 


iMKHtmum 



Notice that the screen is being cleared, but the cursor keeps popping 
This cursor can easily be eliminated by changing line 5 to 


With the above line at the beginning of your program you can make 
things a lot neater. 


NOTE: When you list a program 
containing a PRINT “ f ” on a 
printer, the arrow will not show 
up. Instead, you will see a 
parenthesis “)” or bracket on 
the paper. 





Hip Hip ARRAYS 


ARRAYS can be thought of as boxes. 

~~5~ 

10 

15 

20 

30 

or “elements” in which you store numbers. In ATARI BASIC, they are 
groups of numeric variables and, like any numeric variable, you can 
assign values to them, change the values, or do mathematical 
manipulations with them (by multiplying the value in one box by the 
value in another, for instance). In this example, you could multiply the 
top box by the bottom and get 150. 

Of course, just like anything else related to computer programming, 
you need to learn a few rules... 

ARRAY Rule #1 


Each ARRAY element needs a two-part name. First comes a letter or 
letters. _ 


^A(l) 


Then a number (These are also called subscripts.) 

Let’s assume we have assigned these values to this ARRAY. 


In this case, 



A(1) is equal to 5 

A(1) 

5 

A(2) is equal to 10 

A (2) 

10 

A(3) is equal to 15 

A (3) 

15 

etc. 

A (4) 

20 


A (5) 

30 


66 




ARRAY Rule #2 


Before working with ARRAYS, you must DIMension them. But there is 
an important difference between DIMensioning string variables and 
DIMensioning ARRAYS... 

When you DIM an ARRAY such as... 

DIM B(50) 

you’re not saying how many characters are going to be in that ARRAY, as 
you would be if you were DIMensioning a string. When you DIMension 
ARRAYS, you’re telling the computer how many boxes you are going to 
store numbers in and what the names of those boxes are going to be. 


Here’s an example of using an ARRAY with the letter B... 



You even get one extra free 
because B (0) can be used also. 


B (0) 
B (1) 
B (2) 
B (3) 
B (4) 


B (48) 
B (49) 
B (50) 
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First, you can assign values to variables very quickly with ARRAYS. It’s 
easier to assign values to a lot of ARRAY elements than it is to assign 
values to individual variables. 

10 Al = l 
20 A2 = 2 
30 A3 = 3 
etc. 


Instead, you can use an ARRAY to assign values... 

10 DIM A(50) 

20 FOR Z=1 TO 50 

30 LET A (Z) = Z-< - This assigns the value of Z to the 

40 NEXT Z ARRAY starting with 1 and 

ending with 50. 

RUN this program. Then tell your computer to PRINT A(37) 

■aA»ua« The computer has stored 37 into that ARRAY element so 
it will print 37 until you change the value in A(37) or turn OFF the 
computer and erase A(37). 

If you type... 

PRINT A (5) + A (9) You will get 14 until you change 

these values or erase them from 
memory. 


Imagine writing lines like this 50 
times! 
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id you can play some music with your ARRAY. 


REM ARRAY SOUND PROGRAM ONE 
DIM A(50),B(50),C(50),D(50) 

FOR Z = 1 TO 50 

LET A(Z) =0: LET B(Z) =0: LETC(Z) =0: LE 
)(Z) =0: REM SETS ALL VALUES TO ZERO 
LET A(Z) =Z*5I LET B(Z) =Z*4: LET C(Z) = 
3: LETD(Z) =Z*2 
NEXT Z 

FOR N=1 TO 50 

SOUND 0, A (N) , 10, 10: SOUND 1,B(N) , 10, 

: SOUND 2, C (N) , 10, 10: SOUND 3, D (N) , 10, 

NEXT N 

0 FOR N= 50 TO 1 STEP -1 
0 SOUND 0, A(N) , 10, 10: SOUND 1, B (N) , 10 
0: SOUND 2,C (N) , 10, 10: SOUND 3, D(N) , 10 
0 

0 NEXT N 
0 GOTO 70 



By changing a few lines, you can get a screen display of all of th 
dues in your ARRAYS. 


10 REM PROGRAM ARRAY SOUND TWO 
20 DIM A(50) , B (50) 

30 FOR Z=1 TO 50 

40 LET A(Z) =0: LET B (Z) =0: REM SETS ALL 
VALUES TO ZERO 

50 LET A(Z) =Z *5: LET B (Z) =Z*4 
60 NEXT Z 
70 FOR N = 1 TO 50 

80 SOUND 0, A (N) , 10, 10: SOUND 1, B (N) , 10, 
10 

90 NEXT N 

100 FOR N= 50 TO 1 STEP -1 
110 SOUND 0, A (N) , 10, 10: SOUND 1,B (N) , 10 
, 10 

120 NEXT N 

130 SOUND 0, 0, 0, 0: SOUND 1, 0,0, 0 

140 FOR N = 1 TO 50: PRINT " A ( " ; N; " ) = " ; A ( 

N) : SOUND 1, A (N) , 10, 10: NEXT N 

150 FOR N = 1 TO 50: PRINT , "B (" ; N; ") = " ; B ( 

N) : SOUND 1, B (N) , 10, 10: NEXT N 



As mentioned earlier, you can also do mathematical manipulations 
with ARRAY elements. 

If you RUN the preceding program and press SEESEBS , the 
values are still in the ARRAY elements. 

So, if you type... PRINT A (50) 

...You should get a 250. 

Now type... PRINT B (50) 

...And you should get a 200. 

So if you type...PRINT A (50) +B (50) iaCTTEl 


...You should get a 450. 

ARRAYS are useful in programs which keep track of and manipulate 
large groups of numbers 

• Instrument readings could be 1(1) through 1(40). 

• Average rainfall in the 100 largest cities in the United States could be 
R(l) through R(100). 

• Daily hamburger production rates for your 175 hamburger joints 
could be stored in an ARRAY which is labeled H(l) to H(175). 
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MATRIX Madness 


A more powerful and more complicated version of an ARRAY is called a 
MATRIX. 

A MATRIX not only consists of rows of variables going down... 



VT 7 


...but also columns going across. 

For our sample program, you should imagine a class with 5 students. 
(The others got bored and dropped out.) 

Each student will take three tests. The score for the first test will go 
into column #1; the score for the second will go into column #2; etc. For 
the sake of impersonalization, we will refer to each student with an “S” 
and a number. So our student test score matrix would look like this... 


Rows 

(students) 

1 through 5 



S(1,1) 


S(1 >2) 


S(1,3) 


S(2,1) 


S(2,2) 


S(2,3) 


S(3,1) 


S(3,2) 


S(3,3) 


S(4,1) 


S(4,2) 


S(4,3) 


S(5,1) 


S(5,2) 


S(5,3) 



\ t 


Columns (tests) 
1 through 3 


The only things we’re missing now are the students’ scores. 
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Although it’s possible to fill in the scores by assigning values in this 
manner... 

LET S (3,1) =78 

...this program will use INPUT statements. 

NOTE: Once again it is necessary to use a DIMension which is executed 
as follows: 


This is the number of rows. 

DIM S(5,3) 

f 

This is the number of columns. 

If you type NEW and type in this program, you will see that the 
beauty of the MATRIX is that you can manipulate all the values in both 
the rows and columns. Or pass this up and go directly to the next 
program which is more elaborate. 


10 DIM S (5,3) 

20 FOR COLUMN = 1 TO 3 
30 FOR ROW = 1 TO 5 
40 PRINT "TYPE IN THE STUDENT'S 
AND PRESS RETURN" 

50 INPUT SCORE 

60 LET S (ROW, COLUMN) = SCORE 

70 NEXT ROW 

80 NEXT COLUMN 

90 PRINT " V" 

100 FOR X=1 TO 3 

110 FOR Z = 1 TO 5 

120 IF X= 1 THEN POSITION 2, Z 

130 IF X= 2 THEN POSITION 15, Z 

140 IF X= 3 THEN POSITION 28, Z 

150 PRINT "S ("; ZXS 

160 NEXT Z 

170 NEXT X 


SCORE 
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NOTE: I promise that this is the longest program I will ever ask you to 
type into your computer. 

10 REM STUDENT MATRIX PROGRAM 
20 PRINT 
30 REM MATRIX 1 
40 DIM S (5,3) 

50 FOR COLUMN = 1 TO 3 
60 FOR ROW = 1 TO 5 
70 POSITION 2,11 

80 PRINT "WHAT IS THE SCORE OF STUDENT 
NUMBER " ; ROW; " " 

90 IF COLUMN = 1 THEN PRINT "ON TEST NUM 
BER ONE" 

100 IF COLUMN = 2 THEN PRINT "ON TEST NU 

no if column = 3 then print "on test nu Your final display should look like 
MBER THREE" this. 

120 INPUT SCORE: PRINT "V 
130 IF SCORE>100 THEN PRINT "SMART KID 
, THE HIGHEST SCORE IS 100. TRY AGAIN 

."; : print: print: goto 120 

140 LET S (ROW, COLUMN) = SCORE 
150 NEXT ROW 
160 NEXT COLUMN 
170 PRINT "V 
180 FOR X = 1 TO 3 
190 FOR Z = 1 TO 5 
200 IF X= 1 THEN POSITION 2, Z 
210 IF X = 2 THEN POSITION 15, Z 
220 IF X= 3 THEN POSITION 28, Z 
230 PRINT "S("; Z; " , " ; X; ") = "; S(Z,X) 

240 NEXT Z 
250 NEXT X 

260 POSITION 1,8: PRINT "THIS IS A MATR 
IX OF THE STUDENT SCORES" 

270 position 1,10 : print "which student Of course the values will be those 
NUMBER WOULD YOU LIKE AN AVERAGE SCOR enter 

E FOR?" y 

280 PRINT : PRINT "TYPE IN A NUMBER 1 T 
HROUGH 5 AND PRESS THE RETURN KEY" 

290 INPUT S 

300 IF S>5 THEN PRINT "1" : POSITION 1, 1 
1: PRINT "THERE ARE ONLY 5 STUDENTS" : FO 
R DE = 1 TO 300: NEXT DE: GOTO 170 
310 PRINT : PRINT "THAT STUDENT'S A VERA 
GE IS " ; I NT ( (S(S, 1) + S (S, 2) + S (S, 3) ) /3) 

320 GOTO 270 


The computer could also easily average the class scores for each test. 
Simply add lines that tell it to add all 5 scores for each column and divide 
by 5. 
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There are plenty of other applications for MATRICES and there are 
many examples found in other BASIC books. In general, almost anything 
that can be put into rows and columns can be built into a MATRIX. 

For instance, a Vice President of Sales might create a monthly report 
which looks something like this... 

Monthly Report from the 
Desk of K. Schaefer 
$ Sales by Product by Region 


Total dollars 

Widgets Gadgets Sprockets Sockets for each region 



for for for for Total 

Widgets Gadgets Sprockets Sockets $ Sales 




Part 2 


Graphics, Color, 
and Sound 













The Fundamentals of 
ATARI Graphics 


ATARI Home Computers have very powerful graphics capabilities. 

Some of the advanced graphics require more than an introductory 
knowledge of programming and computer design. This section, however, 
should get you started with ATARI Computer graphics. 

ATARI Computers have 3 “text” modes for displaying words on the 
screen. The first mode is... 


GRAPHICS MODE 0 

(Normal Blue Screen) 


This mode is entered by any one 
of the following: 


• Turning the computer 
ON 

• Pressing SYSTEM 
RESET 

• Typing CR. 0 G9 


GR. 0 for Normal-Size Characters 



In GRAPHICS 0 you can POSITION from 0 to 39 across and from 0 
to 23 down. The computer normally indents 2 spaces when printing on 
the screen but not on the printer. 

By using a POSITION in GRAPHICS 0, you can PRINT anywhere 
on the screen. 


Number across 



Number down 



10 POS. 16, 11 
20 PRINT "MIDDLE 1 
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You can use POSITION each time you PRINT in order to keep your 
display on the same part of the screen. 

First RUN this program: , 

f-—- 1 


10 PRINT "I" : POKE 752, 1 
20 POSITION 19, 11 
30 PRINT X 
40 X = X+1 
50 GOTO 20 


Then change line 50 to.... 

50 GOTO 30 
and see the difference. 


POSITION can be used to emphasize displays by making them 
appear to move. 


Try the following. 


10 PRINT »P': POKE 752,1 
20 FOR X = 1 TO 16 
30 POSITION X, 11 
40 PRINT "MIDDLE" 

50 FOR DE = 1 TO 30: NEXT DE 
60 FOR Y = 0 TO 15 
70 POSITION Y, 11: PRINT " " 
80 NEXT Y 
90 NEXT X 


or a slightly fancier version which 
makes the characters appear to 
walk across the screen, i 


10 PRINT "V : POKE 752,1 
20 FOR X = 1 TO 16 
30 POSITION X, 11 

40 IF X/2 = INT (X/2) THEN POSITION X, 11: 
PRINT "M/DD/E" : GOTO 60 
50 IF X<16 THEN POSITION X, 11: PRINT "M 
/DD/E" 

60 IF X= 16 THEN POSITION X, 11; PRINT "M 
IDDLE" 

70 FOR DE = 1 TO 50 : NEXT DE 
80 FOR Y= 0 TO 15 
90 POSITION Y, 11: PRINT " " 

100 NEXT Y 
110 NEXT X 


Simple but Common Errors Often Made when Learning 
to Use POSITION Statements 

1. Positioning too far 
Example: POS. 40,12 

39 is the maximum across in GRAPHICS 0, and 23 is the 
maximum down. 

2. Abbreviating POS. without the period. 

3. Substituting zero for the O in POS. 
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Graphics Characters Are also Used in GRAPHICS 0 


You have probably, by now, either intentionally or accidentally 
encountered the graphics characters which are also available to you in 
GRAPHICS 0. 



BaaoocjnnaQ»i 

g9QQ»nsBQQaa 


You use graphics characters with normal PRINT commands. 

First type PRINT and open the quotes PRINT “ 
Then hold down the key while you ... 

• Type any of the characters shown above. 

• Then close the quotes and press the RETURN key. 

To draw a window, for instance, type this program: 
Hold the key down only when 


you’re pressing these letters.. 


10 PRINT "QWE" I This will appear like 
20 PRINT "ASD" > this on the screen 
30 PRINT "ZXC"J 


A 


10 PRINT 
20 PRINT 
30 PRINT 


RUN this program and then add... 

40 GOTO 10 

This will produce the windows of a very tall skyscraper. 
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For drawing boxes with graphics characters, try the following key 
combinations. 


Hold down the 
typing these keys; 


I key while 


s keys.—I 

“QRRRRRRE” 


10 PRINT “QRRRRRRE” which looks like this. “ f" 
20 PRINT “| 



and UH keys at the 


c? / same time. They are the sides of 

^ the box. 


These are printed by pressing the 


30 PRINT “ ZRRRRRRC " which looks like this “ |_ 
Hold the keyMvhile'pressing^hese’keys. 


RUN this program and try the following one for more flexibility ir 
size. 

10 PRINT “WHAT IS THE HEIGHT OF THE BO 

x”; 

20 INPUT H 

30 PRINT “ | | ” 

40 FOR BOXHEIGHT=1 TO H 

50 PRINT “| | ” 

60 NEXT BOXHEIGHT 

70 PRINT “ |_| ” 

80 FOR DE=1 TO 200:NEXT DE 
90 RUN 



Helpful Hints for Using Graphics Characters 



• A j£jjj makes a good # in case you want to draw a good 

dot. 

• If you want to experiment with graphics character drawing, you can 

press the and keys at the same time and it will lock the 

keyboard into a “graphics character mode.” To get the keyboard 


back to normal, press 
time. 


and I 


I at the same 


i Your printer will not print out graphics characters. Graphics 
characters are for screen displays only. 
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• Remember, as long as they are in quotes you can also create pictures 
with mathematical operators, punctuation marks and inverse video 
characters. 

Here’s a simple program that uses the 

LESS THAN < 
and 

GREATER THAN > 
symbols to give the illusion of movement. 


5 PRINT M> ('" : POKE 752,1 
10 POSITION 19,121 PRINT "<>" 
20 FOR DE = 1 TO 50: NEXT DE 
30 POSITION 19,12: PRINT "X" 
40 FOR DE - 1 TO 50: NEXT DE 
50 GOTO 10 



The following chart can be used for laying out displays in the 
GRAPHICS 0 mode. 



























GRAPHICS 1—For LARGER 
Text 



The text window is a real pleasure because unlike some of your inlaws, it 
can be very useful, and you can make it go away quickly and easily! 

You can print a line of normal-size text along the top of the text 
window. 

Try... 


PRINT "HELLO TEXT WINDOW" 







or you can use the magic # 6; and see what happens... 


PRINT #6; "HELLO SCREEN" 


Your screen should look like this 



If it doesn’t, you probably missed something... Don’t worry; go 
next text mode and you’ll get to the same place quickly. 





*** 


Tricks Ahead 

- 86 - 


*** 


























(Press the MB key here in order to get in and out of INVERSE 
VIDEO.) 03 
Now try... 

PRINT #6;^hello screen^ ’ 

(Press Jr, ;j here and Jjjj| here to get in and out of lower 

lower case.) 

If all went well and your color is properly adjusted, your display 
should look like this... 



Don’t skip over this section without learning it or you’ll never 
amount to anything. 

NOTE: You can get one more color by using a combination of inverse 
video and lower case. The section on COLOR and PEEKS and POKES 
will explain how to make your large text any color you want. 








Using POSITION in GRAPHICS Modes 1 and 2 


You can also use POSITION in GRAPHICS 1 and 2, but you have to 
adjust for fewer points across and down. If you recall, there are 40 spaces 
across and 24 spaces down in GRAPHICS 0. 


In GRAPHICS 1, you can place... 




or without the text window 


GR. l: POS.17,11: PRINT#6; "HI" 

would place the word “HI” in the middle of your screen and to the 
extreme right. 


In GRAPHICS 2, you have room 
for... 



10-19 

20 characters 
across and 12 
down 

111 



Text Window 





































Remember, when using GRAPHICS Mode 1 or 2 and you want to 
display large text, use a #6; between PRINT and your first quotation 
mark. Without a #6; you will PRINT in the text window at the bottom of 
the screen. 

10 GRAPHICS 2 

20 PRINT #6; "THIS IS LARGE TEXT" 

30 POKE 752,1: REM TURNS CURSOR OFF 
40 PRINT "THIS IS SMALL TEXT, BUT IT'S 
0. K. ALSO" 

50 FOR DELAY = 1 TO 300: NEXT DELAY 
60 PRINT 

70 FOR DELAY = 1 TO 300: NEXT DELAY 
80 GOTO 40 


Getting Rid of the Text Window 


00 This can only be done in the programming mode. 00 


To get rid of a text window, add 16 to whatever GRAPHICS mode 
you are in. 


+16 


means no text window 



10 GRAPHICS 2 + 16 

20 PRINT #6; "THIS IS LARGE TEXT" 

30 PRINT #6; "WITH NO TEXT WINDOW" 

40 GOTO 40: REM THIS LINE KEEPS THE DI 
SPLAY ON THE SCREEN 

NOTE: You may see someone’s program listings which show something 
like... 

10 GR.18 

This is the same as GR. 2 + 16. Using the standard GRAPHICS mode 
number and adding 16 seems to be just as easy and is less confusing. 
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Here’s a flashy program which combines GR. 0 and GR. 2 with a few 
other tricks... 


10 PRINT " V : DIM NAME$ (20) : POSITION 2, 
7 

20 PRINT "TYPE IN YOUR NAME AND PRESS 
THE RETURN KEY" 

30 POSITION 4,12: PRINT "NAME" ; : INPUT N 
AME$ 

40 GRAPHICS 2 + 16 

50 POSITION (20-LEN(NAME$) ) /2,41 REM CE 
NTERS THE NAME 
60 PRINT #6; NAME$ 

70 POSITION 1, 7: PRINT #6; "IS A FLASHY 
PERSON" : REM TYPE "ISA FLASHY PERSON" I 
N INVERSE VIDEO 
80 FOR FLIP=0 TO 20 
90 FOR FLASH = 0 TO 14 

100 SETCOLOR 0, 0, FLASH: SOUND 0, FLASH, 1 
0 , 10 

110 NEXT FLASH 

120 FOR DELAY = 1 TO 20: NEXT DELAY 
130 NEXT FLIP 

140 SETCOLOR 0, 0, 14: SOUND 0,0, 0, 0 
150 FOR DELAY = 1 TO 1000: NEXT DELAY 
160 SETCOLOR 0,0,0: SETCOLOR 2, 0, 0 
170 FOR DELAY = 1 TO 800: NEXT DELAY 
180 RUN 


NOTE: You can save line 50 in order to center any GR.2 input called 
NAME$ 

and 

save lines 80 through 130 to make the input flash with sound. 

Further details on how this type of program works and what 
SETCOLOR does can be found in the section on COLOR. 

The following four pages will help you arrange GR. 1 and GR. 2 
displays with or without text windows. Notice that although the width is 
the same, Graphics 1 characters are only half as tall as Graphics 2 
characters. 
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Mode 














Mode 






Mode 







Mode 







GRAPHICS Modes 3 Through 8 

These are the true graphics modes since you usually display blocks of 
color instead of words or letters. 



As a general rule, when you go higher in GRAPHICS modes, you g 
more screen dots (called pixels) and therefore the possibility of a more 
detailed drawing. 

Of course that formula is too simple for computer designers, so 
here’s the basic idea of the trade-offs involved in using each of the 
graphics modes... 


9 ! 



















GR.3 has the same resolution as GR. 0 but it uses blocks of color 
stead of characters. You cannot make very detailed drawings using 
R.3. 


Both of these have the same 



This one uses fewer colors (2) but 
less memory. Use it when you 
need to conserve memory. 


This one has more colors but 
twice as much memory. 




























Both of these have the same moderately high resolution. 



Again, half the colors and half the This has pretty good resolution 

memory used. and can use 4 colors. It uses twice 

as much memory as GRAPHICS 
6, however. 



Very high resolution, 2 colors, lots 
of memory used. Use this where 
detailed drawings are important. 
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As a general rule, consider what type of display you need, and make 
it easy on yourself and the computer. For instance, you should probably 
use GR. 3 to draw a bar chart instead of GR. 8. 



Lots of colors; not much memory 
used; and not too many points to 
plot. 



Only one color is used. More lines 
had to be drawn. More memory 
was used. 


On the other hand, if you wanted to draw a Springer Spaniel... 



Would you let this dog fetch your 
slippers? 



In summary...If you want to draw an ugly bar chart, use GRAPHICS 8. If 
you want to draw an ugly dog, use GRAPHICS 3. 
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Time to Fiddle Around... 

You can do this in direct (immediate) mode with no program lines. 


GR. 3 
COLOR 1 
PLOT 2,2- 
DRAWTO 37,2 
DRAWTO 37, 18 


DRAWTO 2, 2 


(Selects the preset color) 

(PLOT means put a dot of color 
or start drawing from these points. 
It is similar to POSITION in the 
text modes.) 

(DRAWTO means start at the last 
PLOT or DRAWTO point and 
put a line of color here.) 


This is the best diagonal line the computer can draw in 
GRAPHICS 3. 


On to the finer things in life... 


GR. 7 
COLOR 1 
PLOT 2, 2 
DRAWTO 150,2 
DRAWTO 150, 70 
DRAWTO 2, 2 



As you can see, the diagonal line 
is now much straighter. 















Graphics Tips for Beginners 


Even though the Text Window is very handy for experimenting in the 
immediate mode and for easily displaying words and graphics at the 
same time, you may often want to eliminate it from your programs. 

So remember, in the programming mode you can eliminate the text 
window by adding 16 to GRAPHICS 1 through 8. For example, 

10 GR. 2 + 16 OR 10 GR. 8 + 16 


When using a GRAPHICS mode without a Text Window, you might 
also forget to instruct the computer to keep the display on the screen and 
not go back to READY 


One way to maintain your display on the screen, is to make the last 

line an endless loop. 

Try the Following Programs: 


GRAPHICS 7 

COLOR 1 

PLOT 2,2: DRAWTO 150,80 

After the program is run, “READY” 
appears in the text window. 

GRAPHICS 7 + 16 

COLOR 1 

PLOT 2,2: DRAWTO 150, 80 

By adding 16 to GRAPHICS 7 you 
eliminate the text window, but the 
program is executed so fast you can 
hardly see it. 

GRAPHICS 7 + 16 

COLOR 1 

PLOT 2,2: DRAWTO 150,80 
GOTO 40 

Line 40 creates an ENDLESS 
LOOP which prevents the 
program from ending. 

GRAPHICS 7+16 

COLOR 1 

PLOT 2,2: DRAWTO 150,80 

FOR DE = 1 TO 500 : NEXT DE 

This new line 40 creates a slight 
delay before the program ends. 
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If you just want to put up a display for a little while, then go on to 
another part of the program—put a delay loop in the program. Try the 
following program which switches between GR. 7 and GR. 0. 

10 PRINT "f" : PRINT "TYPE A NUMBER FROM 
1 TO 800 AND PRESS RETURN" ; : INPUT HOW 
LONG 

20 FOR EX= 1 TO 3 
30 GRAPHICS 7: POKE 710, 0 
40 COLOR 1 

50 PLOT 2,2: DRAWTO 158,2 
60 DRAWTO 158, 80 

70 DRAWTO 2,2: POKE 752,1: PRINT "THIS I 
S THE GR. 7 DELAY" 

80 FOR DELAY = 1 TO HOWLONG: NEXT DELAY 

90 GRAPHICS 0: POKE 752, 1 

100 SETCOLOR 2,8,6: SETCOLOR 1, 0, 12 

110 POSITION 8, 11 

120 PRINT "THIS IS THE GR. 0 DELAY" 

130 FOR DELAY = 1 TO HOWLONG: NEXT DELAY 
140 NEXT EX 
150 RUN 



* The most frequent ERROR message you will encounter using 
0 different graphics modes is an ERROR 141. It means in simple 

* colloquial terms...“Now you’ve gone too far buster (or bustress).” 

0 You have positioned, plotted, or drawn to a point beyond the range 
0 of the graphics mode that you are working in. BACK OFF! 




Since figuring out how to draw circles in BASIC sometimes involves 
more work than the results appear to be worth, I have included a couple 
of circle routines for you to experiment with. It is probably a good idea 
to start keeping files of various routines you run across in order to select 
the most efficient one for each program you are writing. 

10 REM BIG CIRCLE 
20 GRAPHICS 7 + 16: COLOR 1 
30 FOR LOOP= 1 TO 400 
40 A = A + 0. 05 

50 X = SIN (A) *50: Y = COS (A) *45 
60 PLOT X+80, Y+45 
70 NEXT LOOP 

80 FOR DELAY = 1 TO 500: NEXT DELAY 


10 REM BIG CIRCLE GRAPHICS 8 
20 GRAPHICS 8+16: POKE 709,14: COLOR 1 
30 FOR LOOP= 1 TO 400 
40 A = A + 0. 05 

50 X = SIN(A) *50: Y = COS (A) *45 
60 PLOT X+160, Y+85 
70 NEXT LOOP 

80 FOR DELAY = 1 TO 500: NEXT DELAY 



Slight changes in the preceding program produce an ellipse instead 
of a circle. 


10 REM EL IPSE GRAPHICS 8 
20 GRAPHICS 8+16: POKE 709, 14: COLOR 1 
30 FOR LOOP = 1 TO 400 
40 A = A + 0.05 

50 X = SIN (A) *80: Y = COS (A) *15 
60 PLOT X+160, Y+85 
70 NEXT LOOP 

80 FOR DELAY = 1 TO 500: NEXT DELAY 



The following charts will help you design displays in GRAPHICS 3 
through 8. 
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ATARI COLOR 



The ATARI 400 and 800 Computers have superb color capabilities whic 
allow you to draw objects and highlight information in any one of 128 
colors. ATARI color is fairly easy to use once you accept the fact that it 
not extremely easy to use. In other words, not only must you develop a 
general understanding of some strange rules, but you will probably find 
it easier to work with color if you always have this book handy. 





SETCOLOR 


For a more thorough understanding of ATARI color, you need to be 
familiar with the use of two statements, SETCOLOR and COLOR. Since 
only SETCOLOR (abbreviated SE.) is used in both the TEXT and 
GRAPHICS modes, we can look at that first and forget about COLOR 
for a moment. 


Using SETCOLOR in GR. 0 

Your computer has color registers for storing colors. The specific colors 
stored are determined by the TEXT or GRAPHICS mode you are in. 
Usually 3 to 5 colors are stored in color registers. For example, when you 
turn on your computer and automatically enter Mode 0, the color 
registers are filled as follows... 


0 12 3 4 



\ 







s. 

NOT 

USED 

k 

LIGHT 

BLUE 


DARK 

BLUE 

k 

NOT 

USED 

k 

BLACK 


• A light blue is placed in Register 1 to control the brightness or 
luminance of the characters, such as the word “READY” in the 
upper left hand corner. 

• A dark blue is placed in Register 2, which dictates the color of your 
screen or “background color.” 

• A black is placed into Register 4, which controls the color of the 
“border” around your background. 

• Since Registers 0 and 3 are not used in this mode, no colors are 
placed into these registers. 

The colors which are automatically placed in the color registers are 
called “default colors.” 
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Default Colors 


Everytime you turn the computer ON or change GRAPHICS modes, the 
computer selects specific colors to put into the color registers. 

You have a choice of using these “default” colors or selecting new 
ones by using SETCOLOR. 



NOTE: While all graphics modes have a background color, GRAPHICS 
Modes 0 and 8 also have a border around the screen. The default color of 
the border is always black, but you will soon learn how to change it. 


BORDER in GRAPHICS 0 and 8 

BACKGROUND 
(Color of the screen) 







Changing Colors 


You have the ability to change the background or the border of this 
screen to any of 16 basic colors. In addition, you can determine how 
bright or dark you want that color. Sixteen colors times eight luminances 
(brightnesses) equal a total of 128 colors to select from. 


The 16 basic colors you can You can use this program to 

choose from are select these colors on the screen. 


COLORS 

0 = Gray 

1 = Light orange 

2 = Orange 

3 = Red orange 

4 = Pink 

5 = Purple 

6 = Purple blue 

7 = Blue 

8 = Blue 

9 = Light blue 

10 = Turquoise 

11 = Green blue 

12 = Green 

13 = Yellow green 

14 = Orange green 

15 = Light orange 


10 REM COLOR CHOOSE 

20 PRINT "V : REM CLEARS SCREEN 

30 POKE 752, 1: REM TURNS OFF CURSOR 

40 POSITION 3,6: PRINT "TYPE IN A NUMBE 

R AND PRESS RETURN" 

50 POSITION 6,9: PRINT "WHAT NUMBER DO 
YOU WANT" ; : INPUT KOLOR 
60 SETCOLOR 1, X, 14 : REM MAKES TEXT BRIG 
HT 

70 POSITION 9, 11: PRINT "THE COLOR NUMB 

ER IS ";KOLOR 

80 SETCOLOR 2, KOLOR, 4 

90 FOR DELAY = 1 TO 1000: NEXT DELAY 

100 GOTO 20 


NOTE: In order to avoid confusing the computer, 
it’s good practice not to use variable names 
which contain BASIC key words such as COLOR 
or NEW. For example, line 40 contains the 
variable KOLOR. 


If your colors do not match these numbers very well, it is possible 
that your TV or monitor is out of adjustment or has controls such as 
Automatic Fine Tuning (AFT) ON when they should be OFF. If you 
cannot get close, any authorized ATARI Service Center should be able to 
check your computer output quickly and easily. 

In addition to being able to control the color of your screen and 
border, you can also control how bright or dark the characters on the 
screen are. The following information will give you practice in 
controlling background color, border color and character brightness... 
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The first number following the SETCOLOR selects color register 
(1,2 or 4 in GR. 0). For example, your background color is controlled by 
a SETCOLOR 2. 


SE. 2,4,8 


will turn your screen into a fairly 
gross pink color which is color 4 
with a brightness of 8. 


The next number controls the actual color. 


SE. 2, 0 .h,ough 15, 8 

Any of the basic 16 colors listed 
on the previous page can go here. 


For instance, SE. 2,6,8 will turn your screen purple-blue. 


The third number controls the brightness of the color you selected. 

SE.2,6, 0 through 14 

4 

0 = DARKEST 
14 = BRIGHTEST 
(Only EVEN numbers have an 
effect so 3 would be the same as 2 
or 11 the same as 10.) 
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Now, select another color register. 

SETCOLOR 1 controls the brightness of the characters. 


__ . ANY „ . . 

SE.1, NUMBER, 0-14 


No effect, because the color of 0 = Darkest 
the characters is always the same 14 = Brightest 
as the GR.O background. Even numbers only. 




SE. 2,6,8 
SE. 1,0,8 


k brig] 


IMPORTANT...If these last two 
numbers are the same, then your 
characters will disappear because 
the letter and the background 
become the same color and 
brightness. 


Here’s a program that demonstrates how you can use this to make words 
appear and disappear. 


10 PRINT "^" : REM CLEARS THE SCREEN 
20 POKE 752,1: REM TURNS OFF CURSOR 
30 POSITION 12, 11 
40 PRINT "NOW YOU SEE IT" 

50 SETCOLOR 2, 15,12 

60 SETCOLOR 1, X, 2 

70 FOR DELAY = 1 TO 600: NEXT DELAY 

80 SETCOLOR 1, X, 12 : REM THIS MAKES THE 

CHARACTERS THE SAME BRIGHTNESS AS THE 

BACKGROUND 

90 FOR DELAY = 1 TO 600: NEXT DELAY 
100 GOTO 50 
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Now erase that program and type in this one which slowly flips 
through the brightness of the letters and makes them appear to flash. 


10 PRINT "If" : REM CLEARS THE SCREEN 
20 POKE 752,1: REM TURNS OFF CURSOR 
30 POSITION 10, 11 
40 PRINT "NOW YOU FLASH IT" 

50 SETCOLOR 2, 13, 8: REM BACKGROUND 

60 FOR REPEAT = 1 TO 100 

70 FOR FLASH =0 TO 14 STEP 2 

80 SETCOLOR 1, X, FLASH 

90 FOR DELAY = 1 TO 15: NEXT DELAY 

100 NEXT FLASH 

110 NEXT REPEAT 

If you recall, SETCOLOR 4,__controls the color of the 

border. 



85 SETCOLOR 4,6,6:REM BORDER COLOR 
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Using SETCOLOR in 
GRAPHICS 1 and 2 


Now that you have mastered the color control of Graphics Mode 0, let us 
proceed to Graphics Modes 1 and 2. Otherwise you might not get 
confused! 

Graphics 1 and Graphics 2 do not have borders, but they do have 
text windows. In both of these modes, you can control the following... 

• The color of the background 

• The color of LARGE WORDS PRINTed after a PRINT #6; in 
normal upper-case letters 

• The color of LARGE WORDS PRINTed after a PRINT #6; in 
inverse video UPPER-CASE letters 

• The color of LARGE WORDS PRINTed after a PRINT #6; in 
inverse video lower-case letters 

• The color of LARGE WORDS PRINTed after a PRINT #6; in lower¬ 
case letters 

• The color of the text window 

• The luminances of the text in the text window 

NOTE: Not all of these are 
controlled independently, but you 
should be able to get any desired 
effect with very few trade-offs. 




Default Colors in GR. 1 and 2 


Since the color registers are the same for both GRAPHICS 1 and 2, these 
examples will be done in GRAPHICS 2. So the only difference is that the 
words will be bigger than if they were done in GRAPHICS 1. 

Press GnQuETSIl 
Then type... 


GR.2 ESSEQ 


When you did that, the computer placed its GRAPHICS 1 and 2 default 
colors into the color registers. 

It did so as follows... 


0 12 3 4 







s. 


\ 

N. 

ORANGE 


LIGHT 

GREEN 


DARK 

BLUE 

It 

RED 

h. 

BLACK 


1 

Upper 

1 

Lower 

1 

Inverse 

i 

Lower 

1 

Color of 

Case 

Case 

Video 

Case 

Back¬ 




Inverse 

Video 

ground 


To get to registers 0 through 3, type PRINT #6; and use the character 
styles shown above. To get to register 4, use SETCOLOR 4,_,_ 
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A Quick Refresher 

To get into INVERSE VIDEO Press once. 
To get out of it... Press it again. 


To get into lower case.. 


REMEMBER, the computer will not accept instructions such a 
PRINT in lower case. 


PRINT #6; “HELLO” 
PRINT #6; “there” 
PRINT #6: “FRIEND” 
PRINT #6: “fred” 


Print in UPPER CASE. 
Print in lower case. 

Print in INVERSE VIDEO. 
Print in lower-case 
INVERSE VIDEO. 


After a few tries your output should look like this 


Orange — 
Light green - 


If you are hopelessly confused at this point, review the section on 
GRAPHICS 2 and come back to this section. Getting in and out of 
INVERSE VIDEO and lower case can be tricky for the beginner. Don’t 
be afraid to press EEHUSIi an d type GR. 2 for a fresh start. 



Now let’s change the colors in those registers using SETCOLOR. We 
could start by making everything a different shade of that gross pink that 
I seem to like so much. 


SE.0,4,6 - 
SE.1,4,8 - 
SE.2,4,10 


makes HELLO almost RED. 
makes THERE a true PINK, 
makes FRIEND and the text 
window a color which should 
only be used for poodle collars, 
makes FRED bright PINK. 


Finally, let’s lighten the background also... 


SE.4,4,14 


0 12 3 4 


SE.0,4,6 


SE.1,4,8 

s. 

SE.2,4,10 

s. 

SE.3,4,12 

s. 

s. 

SE.4,4,14 

Hello 


There 


Friend 


Fred 

Background 
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Color for GRAPHICS Modes 3 
Through 8 


Now that you have an idea of how SETCOLOR works with the Text 
Modes, you can learn how to use it with the COLOR statements that are 
used with GRAPHICS MODES 3 through 8. 

Here’s a general rule. 



When you enter GRAPHICS Mode 3, 5, or 7, the SETCOLOR 
registers are filled with the following default colors... 


0 12 3 4 



Default color 
of back¬ 
ground. 

You can now do one of two things: 

1. Change any of the colors in these registers using SETCOLOR. 

-OR- 

2. Use COLOR to pick from registers 0,1,2 or 4. This will determine 
the color of dots or lines you put on the screen. 
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Using COLOR 


COLOR is used in the true GRAPHICS MODES (3 through 8), in order 
to select which color register you want. When you want to select or 
change the color of the next point or line to be drawn, you use COLOR 
and a number to select the appropriate SETCOLOR register. 



You would think that if you 
wanted to use the color in register 
0 you would type COLOR 0, or 
for register 1 you would use 
COLOR 1. Well, that would be 
too easy for you! In order to 
pack a lot of power into your 
BASIC cartridge, the designers 
decided that you would have to 
do a little translating here. As it 
turns out, things are a little bit 
more tricky than we might have 
wished. 


Here’s an example that uses the default colors in registers 0,1,2 and 4. 
Type the following and don’t forget to press the l:l=mi:l?l key after each 
line. 


GRAPHICS 3 
COLOR 1 

PLOT 2,2: DRAWTO 38,2 
COLOR 2 

PLOT 2,4: DRAWTO 38, 4 
COLOR 3 

PLOT 2,6: DRAWTO 38,6 
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Notice that COLOR 1,2 and 3 were used to select registers 0,1 and 2! 
Also observe that using SETCOLOR to change the value in these 
registers will change the colors of the lines you have just drawn. 

Type the following and notice the results... 


SE.0,4,4 - 
SE.1,0,14 


SE.2,8,0- 


SE.3,8,12- 


SE.4,7,4 


changes the first line to RED. 
changes the second line to white 
and makes the characters in the 
text window brighter because this 
register’s luminance also controls 
the brightness of the characters in 
the text window, 
changes the color of the third line 
and the color of the text window. 
HAS NO EFFECT! This register 
is not used in this GRAPHICS 
MODE. 

changes the background to a 
different shade of blue 


Change the color in the registers using these numbers with SETCOLOR. 

0 1 2 3 4 



S. 


V 


N 


N 

\ 

RED 

k 

WHITE 


BLUE 

k 

NOT 

USED 

k 

DARK 

BLUE 


t t t 

Access Access Access 


Access 


using 
COLOR 1 


using 
COLOR 2 


using 
COLOR 3 


using 
COLOR 0 


Nothing to it, right? 

W rong! You see, the way this works in the other GRAPHICS Modes is 
slightly different. 
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GRAPHICS Modes 4 and 6 


For GRAPHICS 4 and 6, only two color statements are used. Change the 
color in the registers using these numbers with SETCOLOR. 



* i 


Access using Access Using 

COLOR 1 COLOR 0 


GRAPHICS Mode 8 






Summary of SETCOLOR 
and COLOR 


SETCOLOR registers can be used to control a variety of things: 

• The color of the border or the background. 

• The color of the points you plot and the lines you draw. 

• The brightness of the characters on the screen. 

• The color of objects used in advanced graphics techniques. 


COLOR 0,1,2,3, or 4 are used (starting with GRAPHICS Mode 3) to tell 
the computer that you want to plot or draw a line with a color stored in a 
particular color register. You have to be sure that the COLOR number 
you choose is appropriate for the SETCOLOR register used in the 
graphics mode you are in. 

If you’re confused, don’t worry; all of these are summarized in the 
section titled “The Relationship Between Using SETCOLOR and 
POKEing COLORS.” After you read about POKEing COLORS, you will 
find an easy-to-use summary chart. 


With a little review and practice, 
you will find the use of 
SETCOLOR and COLOR 
effortless. 
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“I’ve never met a pitch and distortion value I didn’t like.” 

(W. Rogers, paraphrased) 

“Always give a distortion register an even value.” 

(W.C. Fields, paraphrased) 


Try this program... 


10 FOR Z=0 TO 255 
20 SOUND 0, Z, 10, 10 
30 NEXT Z 


Now RUN the program. Be sure the TV volume is turned up. This is 
your elementary sound loop, which would be a monumental 
programming accomplishment on some other computers. 

Now add... 


40 FOR Z= 255 TO 0 STEP -1 
50 SOUND 0, Z, 10, 10 
60 NEXT Z 
70 GOTO 10 


Now RUN this new program. 
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The Essentials of ATARI 
SOUND 


There are many complex and tricky ways to create sounds with ATARI 
Home Computers, but the essential elements of creating sound in BASIC 
can be summarized as follows: 



In order to make a sound, you 
need to tell the computer that 
you want a sound. 

In order to use a sound 
register, you need a number 0 
through 3 here. (There are 4 
sound registers.) 

Place a pitch 0 to 255 next. 

Now a distortion level 0 to 
14—even numbers only. A 10 is 
a pure tone (no distortion.) 

And volume —everyone 
understands volume. 0 to 15 
are the volume values. 


SOUND 3,45,10,10 


Commas 



Notice that you can do a totally different sound for each of the foi 
sound registers... 

PRESS 

Now try some harmony in the direct mode. Type... 


SOUND 0, 50, 10,6 
SOUND 1,100,10,6 
SOUND 2,150, 10, 6 
SOUND 3,200, 10, 6 


Remember to press the | 
key and turn up the TV volume 





To turn off a sound, use a SOUND 0,0,0,0 


Be sure to change this number to 
turn off the correct sound 
register. 


10 HEM SIMPLE KEYBOARD ORGAN 
20 PRINT "TURN UP THE TV VOLUME AND HI 
T ANY KEY EXCEPT BREAK 
30 OPEN #1,4,0, "K: " 

40 GET #1,X 


50 SOUND 0, X, 10, 8: POKE 712, X 
60 FOR D = 1 TO 75: NEXT D: SOUND 0,0,0, 0 
70 GOTO 40 


These instructions look at the 
ASCII code for the key you press. 
This is a bit advanced and not 
really relevant to 
sound. More 
information on 
using ASCII coding 
can be found in the 
section on 
FUNCTIONS. 


Try this program the way it’s listed and then take out the SOUND 
0,0,0,0 to see the difference. 

Here’s a program to play along with Stormy Weather... 

10 GRAPHICS 7 + 16: SETCOLOR 4,0,0: SETCOL 
OR 1,0, 4 
20 COLOR 2 

30 PLOT 2,2: DRAWTO 30,34: DRAWTO 78,40: 

DRAWTO 100,57: DRAWTO 110, 50: DRAWTO 140 
, 76 

40 FOR LIGSOU = 1 TO 255 

50 SOUND 0, LIGSOU, 8, 10 

60 IF LIGSOU = 8 THEN SETCOLOR 1, 0, 14 

70 NEXT LIGSOU 

80 SETCOLOR 1,0,0 

90 FOR DE = 1 TO 200: NEXT DE 

100 GOTO 10 

You’ll find more examples using SOUND in the section on Paddle 
Controllers. 
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POKEing Around 


When you turn your ATARI Computer on, specific memory locations are 
automatically filled with values that influence the way the computer 
behaves. 

For instance, in the standard GRAPHICS mode 0, the number which 
is placed into location 710 controls the color of your screen. When you 
turn your computer ON, a 148 is placed into that location. 148, as it turns 
out, will make your screen the familiar BLUE. You already know how to 
change this using SETCOLOR, but here’s a new way. 

If you type... 


POKE 710,79 

...you will notice that the screen is changed to a somewhat unattractive 
color. 

Now type... 


POKE 712,79 

...and you will observe that the border has changed to the same color. 

From this you can conclude that in GRAPHICS Mode 0, the color of 
the screen is controlled by location 710, and the color of the border is 
controlled by location 712. The value 79 is simply the number associated 
with a particular color. 

Try typing in this program... 

10 FOR X=0 TO 254 STEP 2 
20 POKE 710, X 
30 NEXT X 

Now run it... 
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10 PRINT "r' 

20 FOR X= 0 TO 254 STEP 2 
30 PRINT X 
40 POKE 710, X 
50 FOR D= 1 TO 50: NEXT D 
60 NEXT X 


If you want to stop and look at a particular number and color, 
press and it at the same time. Press them again to continue. 


Now add one more line to the program and make the cursor 
disappear. 


5 POKE 752,1 


To turn the cursor back on, POKE a 0 into location 752. 

Sometimes a 755,1 is needed to turn the cursor off. If 752,1 doesn’t 



JIMMY. 



PEEKing not POKEing 


It is also possible to look into a location just to see what value is there 
without changing it. You do this by “PEEKing” that location. 

For instance... 


Press SHEZEBil 


Now type... 

PRINT PEEK (710) 



Notice parentheses are used 
around the location when you are 
PEEKing. 


You should get a 148...the number associated with the standard BLUE 
screen. 

Now try PEEKing into location 82, which controls the left margin of 
your computer. 


PRINT PEEK (82) 

You should get a 2, the number of spaces the computer usually 
indents for the left margin. 

Back to POKES 

Try this program which makes both your left and right margins the 
same value. 

10 POKE 82,19: POKE 83, 19: PRINT 
20 PRINT "HELLO THERE" 

30 FOR DE = 1 TO 350: NEXT DE: GOTO 20 

...And you see that you now have new margins until you POKE them 
back to normal, press BnHUSS or turn your computer OFF. 
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POKEing a new tab width... 

When you print words or numbers with commas between them, the 
computer normally allows for 10 spaces for each column. "1 o change this 
POKE a new tab width value into location 201. 

10 POKE 201,2 : POKE 82, 0 
20 PRINT I PRINT A, B, C, D, E, F, G 

30 a=a+i: b=b+i:c = c + i:d=d+i:e=e+i:f=f+i 
: G = G+l 
40 GOTO 20 

Here’s a program that combines POKEing color registers with POKEing 
new margins: 

10 POKE 710, 0: POKE 752,1 
20 FOR Z = 1 TO 38: POKE 82 , Z 
30 PRINT"\" 

40 POKE 712, Z*5 
50 SOUND 0, Z*8, 10, 10 
60 NEXT Z 

70 FOR X= 37 TO 1 STEP -1 
80 POKE 82, X 
90 POKE 712, X* 5 
100 PRINT "/" 

110 SOUND 0, X*8,10, 10 
120 NEXT X 
130 RUN 






















Location 755 has some interesting effects on normal and INVERSE 
VIDEO text. The normal value for this location is 2, so to get everything 
back to normal POKE 755,2 

Other values in location 755 have the following effects... 

POKE 755,0—Changes INVERSE VIDEO to normal text and turns the 
cursor off. 

POKE 755,1—Makes anything in INVERSE VIDEO disappear and 
turn the cursor off. 

POKE 755,2—Returns all to normal. 

POKE 755,3—Makes full blocks out of anything in INVERSE VIDEO. 

POKE 755,4—Prints characters upside down with the cursor OFF. 

POKE 755,6—Prints characters upside down with the cursor still ON. 

The following program shows the same INVERSE VIDEO word 
being changed by POKEing different values into location 755. 


10 PRINT "V' : REM CLEARS THE SCREEN 
20 POKE 752,1: REM TURNS CURSOR OFF 
30 POSITION 16, 12 : PRINT "SURPRISE" : REM 
PRINT "SURPRISE" IN INVERSE VIDEO 
40 FOR Z = 0 TO 4 
50 POKE 755, Z 

60 FOR DE = 1 TO 300: NEXT DE 
70 NEXT Z 
80 GOTO 40 
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Here are a few more interesting POKE locations... 


POKE 54018,52—Will start your ATARI 410 Program Recorder. (The 
PLAY button on the program recorder must be 
pressed down.) 

POKE 54018,60—Will turn the Program Recorder off. 



You can play an ordinary music cassette through your TV speaker 
with a POKE 54018,52. Be sure to rewind the tape and press down PLAY 
on the 410 Program Recorder before you begin. 

Here’s a short program which shows you how you can use the 
computer to start and stop the music. 


10 PRINT POKE 752, l: DIM AN$ (1) , ST$ 

(1) 

20 PRINT "TO HEAR MUSIC, TYPE Y AND PR 
ESS RETURN" 

30 INPUT AN$ 

40 IF AN$ = "Y" THEN POKE 54018, 52 : GOTO 
60 

50 GOTO 20 

60 PRINT \ PRINT "TO STOP MUSIC, TYP 
E N AND PRESS RETURN" 

70 INPUT ST$ 

80 IF ST$= "N" THEN POKE 54018, 60: GOTO 
20 

90 GOTO 60 
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You can have your computer PEEK at location 53279 to see if 
anyone out there is pressing the START, SELECT or OPTION keys. 

A 6 means START is pressed. 

A 5 means SELECT is pressed. 

A 3 means OPTION is pressed. 

Here’s an opener for your game programs: 

10 PRINT "PRESS START TO BEGIN" 

20 IF PEEK (53279) = 6 THEN GOTO 40 
30 GOTO 20 

40 PRINT "READY TO BEGIN" 

There are also locations in the computer which you can use for timers. 

The core of this second counter program is line 50. You might 
experiment with it in order to make computer clocks, internal timers or 
stop watches. Keep in mind, however, it takes time for your computer to 
draw fancy displays; so you’ll need to adjust your timing to match your 
displays. 


10 PRINT "Y" : POKE 752,1 
20 POSITION 5,11: PRINT "PRESS START FO 
R SECOND COUNTER " : IF PEEK (53279) =6 THE 
N PRINT "Y" : GOTO 40 
30 GOTO 20 

40 POKE 18,0:POKE 19,0:POKE 20,0 
50 SECONDS = INT ( (PEEK (18) * 65535 + PEEK (19 
) *256 + PEEK (20) ) /60) 

60 POSITION 19,11: PRINT SECONDS 
70 IF SECONDS = 60 THEN PRINT GOTO 4 
0 

80 GOTO 50 
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A more detailed list of locations you can POKE around in are listed 
in the section called “memory locations” in the ATARI BASIC 
Reference Manual. 



f - 

If you don't mind... 

I’d like to get a PEEK at 
J.R. on Dallas tonight! 


NOTE: It is very easy for you to “CRASH” the program (temporarily 
disable it) by POKEing numbers into unknown memory locations. If this 
happens, you will have to turn the computer OFF, then ON again. Some 
people recommend that you don’t POKE around in unknown memory 
locations because you might accidentally erase a diskette or something 
like that. PEEKing memory locations never hurts anything. 
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The Relationship Between Using SETCOLOR and 
POKEing Colors 

As you have learned, ATARI Computers have 128 colors and they also 
have 16 colors. Both statements are right, in a way. You do have 128 color 
variations to choose from. 

Start with 16 basic colors... 


0=Gray 

l=Gold 

2=Orange 

3=Red-orange 

4=Pink 

5=Pink-purple 

6=Purple-blue 

7=Blue 

8=Another Blue 
9=Light blue 
10=Turquoise 
ll=Green-blue 
12=Green 
13=Y ellow-green 
14=Orange-green 
15=Light orange 


...and each of these colors has 8 
levels of brightness or luminance 
(dark to light) 

16 colors * 8 luminances = 128 
colors to choose from! 


To see all 128 colors, use this familiar program: 


10 PRINT "V" : POKE 752,1 
20 FOR Z = 0 TO 254 STEP 2 
30 POSITION 19,12: PRINT Z 
40 POKE 710, Z 

50 FOR DELAY = 1 TO 25: NEXT DELAY 
60 NEXT Z 


NOTE: Only even numbers affect the screen color; that’s why you use 0 
to 254 instead of 0 to 128. 
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The SETCOLOR_,_,_format was designed to help you 

understand and use the color/luminance relationship better. Sometimes 
SETCOLOR is easy, but sometimes using POKES seems more 
convenient. Understanding the relationship between both will make your 
life much simpler. 

Here’s a quick review of the way SETCOLOR works. 

When you use SETCOLOR ... 


SETCOLOR 



This number is used 
for the color register. 


This is the color number. 


And this is the brightness number. 
The even values 0 through 14, 
give you your dark to light value 
for each of the 16 colors. 


0 = Gray 
| through 
15 = Light Orange 


POKEing colors simply inserts equivalent color values from 0 to 254 
into the equivalent color registers. 


Color Registers 704 


Color Values 


Through 



Through 



In GRAPHICS MODE 0 for instance... 


SETCOLOR 2_ 

or 

POKE 710_ 

will control the background color of the screen. 

Try the following examples and look on your SETCOLOR and 
POKE Equivalents Chart for a full understanding of the relationship 
between the two. 


SE.2,3,6 

WILL PRODUCE THE SAME COLOR AS... 
POKE 710,54 
or 

SE.2,15,4 

IS EQUIVALENT TO... 

POKE 710,244 



WILL PRODUCE THE SAME COLOR AS... 
POKE 712,70 
or 

SE.4,7,12 

IS EQUIVALENT TO... 

POKE 712,124 
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SETCOLOR and POKE 
Equivalent Chart 


SE. REGISTER #_ 

/ EQUIVALENT 
POKE 
VALUE 

COLOR 3 0 | 



LUMINANCE= 0_0 

LUMINANCE= 2_2 

LUMINANCE 3 4_4 

Gray LUMINANCE= 6_6 

LUMINANCE= 8_8 

LUMINANCE 3 10_10 

LUMINANCE= 12_12 

LUMINANCE= 14_14 


COLOR= 4 


Pink 


EQUIVALENT 

POKE 

VALUE 


LUMINANCE 3 0_64 

LUMINANCE= 2_66 

LUMINANCE= 4_68 

LUMINANCE= 6_70 

LUMINANCE= 8_72 

LUMINANCE 3 10_74 

LUMINANCE= 12__ 76 

LUMINANCE= 14_78 


COLOR=1 

LUMINANCE= 0_16 

LUMINANCE= 2_18 

LUMINANCE= 4_20 

LUMINANCE= 6_22 

Gold LUMINANCE= 8_24 

LUMINANCE= 10_26 

LUMINANCE 3 12_28 

LUMINANCE 3 14_30 


COLOR 3 5 

LUMINANCE 3 0_80 

LUMINANCE 3 2_82 

LUMINANCE 3 4_84 

Pink- LUMINANCE 3 6_86 

purple LUMINANCE 3 8_88 

LUMINANCE 3 10_90 

LUMINANCE 3 12_92 

LUMINANCE 3 14_94 


COLOR 3 2 

LUMINANCE 3 0_32 

LUMINANCE 3 2_34 

LUMINANCE 3 4_36 

Orange LUMINANCE 3 6_38 

LUMINANCE 3 8_40 

LUMINANCE 3 10_42 

LUMINANCE 3 12_44 

LUMINANCE 3 14_46 


COLOR 3 6 

LUMINANCE 3 0_96 

LUMINANCE 3 2_98 

LUMINANCE 3 4_100 

Purple- LUMINANCE 3 6_102 

blue LUMINANCE 3 8_104 

LUMINANCE 3 10_106 

LUMINANCE 3 12_108 

LUMINANCE 3 14_110 


COLOR 3 3 

LUMINANCE 3 0_48 

LUMINANCE 3 2_50 

LUMINANCE 3 4_52 

Red- LUMINANCE 3 6_54 

orange LUMINANCE 3 8_56 

LUMINANCE 3 10_58 

LUMINANCE 3 12_60 

LUMINANCE 3 14_62 


COLOR 3 7 

LUMINANCE 3 0_112 

LUMINANCE 3 2_114 

LUMINANCE 3 4_.116 

Blue LUMINANCE 3 6_118 

LUMINANCE 3 8_120 

LUMINANCE 3 10_122 

LUMINANCE 3 12_124 

LUMINANCE 3 14_126 
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EQUIVALENT EQUIVALENT 


POKE 

VALUE 


COLOR= 8 I 

LUMINANCE= 0_128 

LUMINANCE 3 2_130 

LUMINANCE= 4_132 

Blue LUMINANCE= 6_134 

LUMINANCE= 8_136 

LUMINANCE= 10_138 

LUMINANCE= 12_140 

LUMINANCE= 14_142 

COLOR=9 

LUMINANCE= 0_144 

LUMINANCE= 2_146 

LUMINANCE= 4_148 

Light LUMINANCE= 6_150 

blue LUMINANCE= 8_152 

LUMINANCE= 10_154 

LUMINANCE= 12_156 

LUMINANCE= 14_158 


POKE 

VALUE 


COLOR=12 | 

LUMINANCE= 0_192 

LUMINANCE 3 2_194 

LUMINANCE 3 4_196 

Green LUMINANCE 3 6_198 

LUMINANCE= 8_200 

LUMINANCE 3 10_202 

LUMINANCE= 12_204 

LUMINANCE= 14_206 

COLOR=13 

LUMINANCE= 0_208 

LUMINANCE= 2_210 

LUMINANCE= 4_212 

Yellow- LUMINANCE= 6_214 

green LUMINANCE= 8_216 

LUMINANCE= 10_218 

LUMINANCE= 12_220 

LUMINANCE 3 14_222 


COLOR= 10 

LUMINANCE= 0_160 

LUMINANCE= 2_162 

LUMINANCE 3 4_164 

Turquoise LUMINANCE 3 6_166 

LUMINANCE= 8_168 

LUMINANCE= 10_170 

LUMINANCE= 12_172 

LUMINANCE= 14_174 


COLOR=14 

LUMINANCE= 0_224 

LUMINANCE= 2_226 

LUMINANCE 3 4_228 

Orange- LUMINANCE 3 6_230 

green LUMINANCE 3 8_232 

LUMINANCE 3 10_234 

LUMINANCE 3 12_236 

LUMINANCE 3 14_238 


COLOR 3 11 

LUMINANCE 3 0_176 

LUMINANCE 3 2_178 

LUMINANCE 3 4_180 

Green- LUMINANCE 3 6_182 

blue LUMINANCE 3 8_184 

LUMINANCE 3 10_186 

LUMINANCE 3 12_188 

LUMINANCE 3 14_190 


COLOR 3 15 

LUMINANCE 3 0_240 

LUMINANCE 3 2_242 

LUMINANCE 3 4_244 

Light LUMINANCE 3 6_246 

orange LUMINANCE 3 8_248 

LUMINANCE 3 10_250 

LUMINANCE 3 12_252 

LUMINANCE 3 14_254 
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Sometimes POKEing 0 to 254 into color registers 704 and 712 can be 
easy and interesting to experiment with. You will find most of your 
results using locations 708 to 712. Later you will learn more about 
locations 704 through 707. 

Example: 

10 FOR Z — 0 TO 254 STEP 2 

20 POKE 710, Z 

30 FOR DELAY = 1 TO 35: NEXT DELAY 

40 NEXT Z 

Will produce the same result as this SETCOLOR version... 


10 FOR K= 0 TO 15: REM LOOP FOR 16 COLOR 
S 

20 FOR L = 0 TO 14 STEP 2: REM LOOPS THRO 

UGH THE 8 LUMINANCES OF EACH 

30 SETCOLOR 2, K, L 

40 FOR DELAY = 1 TO 35: NEXT DELAY 

50 NEXT L 

60 NEXT K 


However, let’s say you wanted to flip from a dark red screen 
through to a light red screen, over and over. For that, all you would have 
to remember (or find out) is that red is number 4 which is placed second 
in the SETCOLOR statement, and you could just flip through the 
luminance values (0 to 14). 

This is much easier than 
remembering the POKE value 
equivalents —^ 


10 FOR N= 0 TO 14 STEP 2 

20 SETCOLOR 2,4, N 

30 FOR DELAY = 1 TO 35: NEXT DELAY 

40 NEXT N 

50 GOTO 10 


10 FOR N= 64 TO 78 STEP 2 
20 POKE 710, N 

30 FOR DELAY = 1 TO 35: NEXT DELAY 
40 NEXT N 
50 GOTO 10 


In conclusion, sometimes SETCOLOR is the approach to use and 
sometimes you have to POKE your way through color graphics. As you 
learn about new graphics modes, you will find that both SETCOLOR 
and color POKES are necessary. Experimenting with both SETCOLOR 
and POKES will get you further down the color brick road. 
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SETCOLOR Register and POKE Location Equivalents 

The following registers are essentially equivalent. It is up to you to 
determine whether to use a SETCOLOR ( Register, Color, Luminance) or 
a POKE (0 to 254). 

Graphics Mode 0 



SETCOLOR 

2_ 

Screen Color 

POKE 

710_ 

SETCOLOR 

4_ 

Border Color 

POKE 

712_ 

SETCOLOR 

1_ 

Intensity of Characters 

POKE 

709_ 
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GRAPHICS Modes 1 and 2 


SETCOLOR 2__ 

SETCOLOR 1_ 

SETCOLOR 4_ 

SETCOLOR 0,_ 


SETCOLOR 2_ 


SETCOLOR 3,_ 

SETCOLOR 1,_, 


Text Window 

POKE 710, 

Intensity of Text in 

Text Window 

POKE 709, 

Background 

POKE 712, 

Color of Large 
(PRINT #6;) 

Text Entered in 

Normal LTpper-Case 
Letters 

POKE 708, 

Color of Large 
(PRINT #6;) 

Text Entered in 
INVERSE VIDEO. 

Note : This will be the 
same color as the Text 
Window. 

POKE 710, 

The Color of Large 
(PRINT #6;) Text 

Entered in Lower 

Case INVERSE 

VIDEO 

POKE 711, 

The Color of Large 
(PRINT #6;) Text 

Entered in Lower 

Case. Note: This will 
also control the 
intensity of normal- 
size characters in the 

Text Window and 
could make them 
disappear if their 
intensity matches the 
background intensity. 

POKE 709, 
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GRAPHICS Modes 3, 5 and 7 


SETCOLOR 

4___ 

Background 

POKE 712, 

SETCOLOR 

2_ 

Text Window 

POKE 710, 

SETCOLOR 

1- 

Intensity of 

Characters in 

Text Window 

POKE 709, 

SETCOLOR 

0_ 

COLOR 1 

POKE 708 

SETCOLOR 

1--- 

COLOR 2 (Also 
controls intensity of 
Characters in Text 
Window). 

POKE 709, 

SETCOLOR 

2,_._ 

COLOR 3 (Also Color 
of Text Window) 

POKE 710, 


GRAPHICS Modes 4 and 6 

SETCOLOR 4,-,- Background Color POKE 712, 

SETCOLOR 0_COLOR 1 POKE 708, 

SETCOLOR 1,_,_ Intensity of POKE 709, 

Characters in 
Text Window 

SETCOLOR 2,-,.— Text Window POKE 710. 



GRAPHICS Mode 8 


NOTE: The color of the text window is the same color as the 
background. 

SETCOLOR 2 ___ Background POKE 710 

SETCOLOR 1, _,_ COLOR 1 Luminance POKE 709 

Control Only. Color is 
the Same Color as 
Background. 

SETCOLOR 4, _Border POKE 712 


GTIA 

GTIA GRAPHICS Modes 9,10, and 11 
(Covered in the section on GTIA) 



All The Way With GTIA 


In a continuing effort to improve product performance, ATARI’S Home 
Computer Division has put a new part, called the GTIA chip, into its 
Home Computers. 

This chip will allow you to write advanced graphics programs in 
BASIC because you have access to more shades and colors in additional 
graphics modes. You actually have 256 colors to choose from in one of 
the GTIA modes! 


GTIA GRAPHICS 9 

GRAPHICS 9 allows you to simultaneously use 16 luminances of a single 
color so you can create images with subtle degrees of shading on the 
screen. 


GTIA GRAPHICS 10 

GRAPHICS 10 allows you to put eight different colors of any luminance 
on the T.V. screen at one time. 


10 GRAPHICS 10 

20 FOR KOLASIGN= 705 TO 712: POKE KOLASI 
GN, INT (RND(0)*255) : NEXT KOLASIGN 
30 COLOR INT (RND (0) * 7) + 1: PLOT INT (RND ( 
0) *79) , INT (RND (0) *191) : DRAWTO 39, 95 
40 GOTO 20 


NOTE: The use of random 
numbers (RND) is explained in 
detail in the section on 
FUNCTIONS. 
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GTIA GRAPHICS 11 


GRAPHICS 11 gives you the ability to put 16 colors on the screen at 
time! You can also easily vary the luminance of the 16 colors. 


To summarize the three additional modes of the GTIA chip... 

• GRAPHICS 9—You choose 1 of 16 colors and then you can use 16 
shades of that color. 


• GRAPHICS 10—8 colors, but no limitations regarding what color 
is used or the luminance. Dark and light colors can be used in any 
combination. The background color can also be controlled. 


• GRAPHICS 11—16 different colors on the screen at the same 
time. You are given a full spectrum and you choose all or some of 
the 16 colors. You can vary how light or dark this spectrum 
appears. But, the same lightness or darkness applies to all colors at 
the same time. 



The GTIA chip opens up a world of color and computer design to 
beginning BASIC programmer. Some of these capabilities were 
previously known only to heavy-duty programmers and the people wil 
access to expensive graphics computers. 



There is one catch 
of course! 


You may not have the GTIA chip in your computer. It is possible 
that you, instead, have the original CTIA chip. 



The GTIA Test 

An easy way to find out which chip you have in your computer is to 
RUN this simple program... 

10 GRAPHICS 11 
20 FOR Z = 0 TO 15 
30 COLOR Z 

40 PLOT 0, Z : DRAWTO 79, Z 
50 NEXT Z 
60 GOTO 60 


If you get any sort of ERROR message when you run the above 
program, check to see if you copied the program accurately. If you have 
a nice rainbow-like color bar display across the top of the screen, then 
you have a GTIA chip in your computer. If you don’t, then you either 
have a Black-and-White television or a CTIA chip. 

If you do not have a GTIA chip, but would really like to explore its 
graphics capabilities, then... 

1. Bring your computer to an ATARI Factory Authorized Service 
Center for a GTIA upgrade. 

—OR— 

2. Sell your computer to a friend who is color blind and buy a new 
one. 
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In order to see the difference between Graphics 11 (16 colors) and 
Graphics 9 (16 shades of 1 color), simply change the first line of the 
previous program to read GR. 9 instead of GR. 11 and notice the 
difference when you RUN the program. 


HowTo Program the GTIA Modes 9,10, or 11 in BASIC 

Item #1: There are no text windows in GR. 9, 10, or 11 (hence no 
immediate mode), so you must write programs in order to use the GTIA 
modes. These are graphics modes only, so you do not have to add a 
“ + 16 ” to get rid of the text window. 

Item #2: The resolution of Graphics Modes 9, 10, and 11 are all the same: 
80 x 192. This is unusual since there are fewer points across than down. 


Use the following chart for plotting out your GTIA programs. 






































Programming with 
GRAPHICS 9 

In order to select your basic color use SETCOLOR as follows. 



here. A 0, for instance, would give 
you shades of Gray and 4 would 
give you shades of Red. Refer to 
the basic 16 colors listed in the 
section on Color. 


To select how bright a dot or line will be, use COLOR followed by a 
number, 0 through 15. (0 is the darkest and 15 is the lightest.) 


NOTE: If you’re real quick you may have noticed that GRAPHICS 9 is a 
special mode that allows for the selection of 16 colors plus 16 shades so in 
this mode there are actually 256 colors to choose from! 
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Here’s an example that produces lines that are two different shades of 
red on a dark red background. 


10 GRAPHICS 9 
20 SETCOLOR 4,4,0 
30 COLOR 12 : REM LIGHT RED LINE 
40 PLOT 39, 2: DRAWTO 39,191 
50 PLOT 40, 2: DRAWTO 40,191 
60 COLOR 4: REM DARK RED LINE 
70 PLOT 41,2: DRAWTO 41,191 
80 PLOT 42, 2 : DRAWTO 42,191 
90 GOTO 90 


The following program draws a smoothly shaded bar across the 
screen, flips through all 16 colors by alternating the middle value (the 
variable FL) in the SETCOLOR statement in line 100. 


5 REM GTIA BAR GR. 9 
10 GRAPHICS 9 
20 FOR Z = 64 TO 80 
30 COLOR Z 

40 PLOT 2, Z : DRAWTO 79, Z 
50 NEXT Z 

60 FOR K= 95 TO 80 STEP -1 
70 READ X: COLOR X 
80 PLOT 2 , K: DRAWTO 79, K 
90 NEXT K 

100 FOR FL=0 TO 15: SETCOLOR 4, FL, 0: FOR 
DE = 1 TO 300: NEXT DE: NEXT FL: GOTO 100 
110 DATA 0,1,2,3,4,5,6, 7,8,9,10,11,12, 
13,14,15 
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GRAPHICS 10 


Like GRAPHICS 9 and 11, the resolution of GRAPHICS 10 is 0 to 79 
across and 0 to 191 down. The advantage of GR.10 over all the other 
modes available is that you cannot only choose 8 colors and also the 
luminance of each of those colors, as well as one additional color for the 
background. The dues you pay for this flexibility is that GR.10 is the 
most awkward mode to assign color and luminance values to. You need 
COLOR, POKEs, and SETCOLOR to use GR.10 in BASIC. 

The easy thing to get used to is the fact that you use COLOR 0 
through 8 to determine the color of the different color points or 
lines you draw. 

The hard part is getting the specific colors you want into the right 
registers. The following chart should help immensely: 


GRAPHICS 10 


DEFAULT 

POKE POKE 

VALUE LOCATION 


COLOR 0 NO SETCOLOR 
COLOR 1 NO SETCOLOR 
COLOR 2 NO SETCOLOR 
COLOR 3 NO SETCOLOR 
COLOR 4 SETCOLOR 0,_,_ 
COLOR 5 SETCOLOR 1,__ 

COLOR 6 SETCOLOR 2_ 

COLOR 7 SETCOLOR 3_ 

COLOR 8 SETCOLOR 4_ 


0 704 —Background 

0 705 

0 706 

0 707 

40 708 

202 709 

148 710 

70 711 

0 712 


The following program first draws, then changes, the color bars. 
This shows how you can get 9 different colors on the screen at the same 
time. 

10 GRAPHICS 10 
20 FOR X= 15 TO 65 
30 N= INT (RND (0) *8) +1 
40 COLOR N: REM GIVES RANDOM COLOR (1 TO 
8) TO LINE DRAWN 
50 PLOT X, 2 : DRAWTO X, 191 
60 NEXT X 

70 REM THIS SECTION PUTS RANDOM COLORS 
INTO POKE LOCATIONS 704 TO 712 OVER A 
ND OVER 

80 FOR COLPOKE = 704 TO 712 
90 K = INT (RND (0) *255) 

100 POKE COLPOKE, K 

110 NEXT COLPOKE 

120 FOR DE= 1 TO 100: NEXT DE 

130 GOTO 80 
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GRAPHICS 11 


In GRAPHICS 11 you can put 16 colors on the screen at one time. In 
addition, you can control the luminance of the colors you put on the 
screen. 


In other words, GR. 11 is like having a rainbow available, 
and being able to turn a knob and make that rainbow as 
light or as dark as you want. 

The color of the line or point you draw to is determined by your use 
of COLOR 0 through 15. These colors represent the standard 16 colors 
with a default luminance value of 6. 



10 GRAPHICS 11 
20 FOR Z = 0 TO 15 
30 COLOR Z 

40 PLOT 0, Z : DRAWTO 79 , Z 
50 NEXT Z 
60 GOTO 60 


This gives you your basic color program and the following change will 
give you some interesting results. 


60 FOR LUMLOOP = 0 TO 14: SETCOLOR 4, 0, LU 
MLOOPI FOR DE = 1 TO 3 5 : NEXT DE: NEXT LUML 
OOP: GOTO 60 


To change the brightness of the colors in GR. 11, change the 
luminance in SETCOLOR Register 4. 

SETCOLOR 4,0, LUMINANCE 



Put an even number from 0 to 14 
here (0 is dark). 
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Here are the GRAPHICS 11 rules again: 

• You do not have a text window at the bottom of the screen. 

• The resolution is 80 (0 to 79) across and 192 (0 to 191) down. 

• You can put any of 16 general spectrum colors on the screen at one 
time, but you don’t have to use all 16 colors if you don’t need them. 

• Colors are selected by specifying a COLOR 0 through 15 before you 
do a PLOT or DRAWTO. 

• You can make all 16 colors bright or dark by changing this value, 



but you can’t make some colors bright and some dark. For that, you need 
GRAPHICS 10. 


5 GRAPHICS 11 
10 FOR Z = 0 TO 79 
20 PLOT 0, Z 
30 COLOR Z 
40 DRAWTO Z, 79 
50 NEXT Z 

60 FOR Y= 79 TO 0 STEP -1 

70 PLOT Y, Z 

80 COLOR Y 

90 DRAWTO Y, 79 

100 NEXT Y 

110 GOTO 10 


10 GRAPHICS 11 
20 LL = 191 
30 RL =79 

40 FOR ZEBRA = 0 TO 48 

50 REM GTIA HIWAY+FAST LANE* 

60 COLOR ZEBRA 

70 PLOT RL, LL 

80 DRAWTO 0, 0 

90 RL = RL-1 

100 NEXT ZEBRA 

110 GOTO 110 


5 GRAPHICS 11 
10 FOR Z=1 TO 191 
15 COLOR Z/12 
20 PLOT 0, Z 
40 DRAWTO 79, Z 
50 NEXT Z 

60 FOR FL= 0 TO 14 STEP 2: SETCOLOR 4,0, 

FL: FOR DE = 1 TO 50: NEXT DE: NEXT FL 
70 FOR FLBACK= 14 TO 0 STEP -2: SETCOLOR 
4,0, flback: for de= i to 50: next de: nex 
T FLBACK:GOTO 60 
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Using ATARI Joysticks and 
Paddle Controllers 


The ATARI Joystick and Paddle Controllers are the same ones that are 
used with the ATARI Video Game System. Not only are they a necessary 
part of your computer system if you want to play games, but they are fun 
to experiment with and great for educational programs. To help you use 
these controllers, ATARI put Joystick and Paddle programming aids into 
its BASIC language. 


The Joy of Joysticking 

The Joystick is most useful when you want movement that is up and 
down, or left and right. 

During its spare time, the ATARI computer checks to see if anyone 
out there is fooling around with a Joystick or Paddle Controller. It does 
this 60 times each second! 

The computer interprets the position of the Joystick as certain 
numbers. Keep in mind, the numbers are predetermined. You don’t 
program the numbers, you just have the computer do something if it 
finds a particular number. 

Try this example... 

10 IF STICK (0) = 14 THEN PRINT "HOW FORW 
ARD OF YOU! " 

20 GOTO 10 


Hold the Joystick with 
the button in the upper 
left-hand corner. 



Now RUN the program 
and see what happens 
when you push the 
Joystick forward. 
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Notice that the computer reads a 14 when it senses that the Joystick 
is pushed forward. The other 8 numbers it interprets are as follows... 


Stick Is Pushed 
Forward 



Stick Is Pulled 
Back 


Try this program: 


10 PRINT STICK (0) : GOTO 10 


RUN the program and move the stick around or change it to this... 

10 X = STICK (0) 

20 PRINT X 

30 SOUND 0,X*10, 10, 10 
40 GOTO 10 


NOTE: It is sometimes easier to work with Joysticks when you assign 
them variable names such as...X=STICK(0). 



Here’s a program you can use to teach someone the points of a compass. 


10 PRINT : POKE 752, 1: X= STICK (0) 

20 IF X=14 THEN POSITION 17, 2: PRINT "N 
ORTH" 

30 IF X= 13 THEN POSITION 17, 22: PRINT " 
SOUTH" 

40 IF X=ll THEN POSITION 2, 12: PRINT "W 
EST" 

50 IF X=7 THEN POSITION 34, 12: PRINT "E 
AST" 

60 IF X = 6 THEN POSITION 29, 4: PRINT "NO 
RTH EAST" 

70 IF X = 5 THEN POSITION 29,20: PRINT "S 
OUTH EAST" 

80 IF X = 10 THEN POSITION 2,4: PRINT "NO 
RTH WEST" 

90 IF X= 9 THEN POSITION 2,20: PRINT "SO 
UTH WEST" 

110 IF X= 15 THEN POSITION 0, 12: PRINT " 
YOU WILL HAVE NO DIRECTION IN LIFE UNT 
IL YOU MOVE YOUR JOYSTICK" 

120 FOR DELAY = 1 TO 500: NEXT DELAY 
130 GOTO 10 
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STRIG 


STRIG stands for STICK TRIGger. The computer is also checking to see 
if the red button or trigger on the Joystick is being pushed. When the 
button is depressed, the computer gets the number 0 instead of a number 
1 . 

RUN the following program and press the joystick button to get the 
idea. 


10 PRINT STRIG (0) 
20 GOTO 10 


Or to get a simple video game type of shot fired, type and run this 
program: 


10 REM STIKFIRE 
20 GRAPHICS 3 + 16 

30 SETCOLOR 0, 2, 14 : REM BRIGHTENS DOT 
40 IF STRIG (0) = 0 THEN GOTO 60 
50 GOTO 10 

60 FOR T = 0 TO 38: SOUND 0, T, 8, 10 
70 COLOR l: PLOT T, 12: COLOR 0: PLOT T, 12 
: NEXT T 

80 SOUND 0, 0,0, 0 
90 GOTO 40 
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A final Joystick program for you to try is this Video Sketchpad 
Program: 

10 GRAPHICS 7+16: X=80: Y = 40 
20 ST = STICK (0) 

30 IF ST= 7 THEN X = X+ 1 

40 IF ST =6 THEN X=X+1: Y = Y-1 

50 IF ST= 14 THEN Y = Y-1 

60 IF ST= 5 THEN X = X+1: Y = Y+1 

70 IF ST= 11 THEN X = X-1 

80 IF ST= 10 THEN X = X-i: Y = Y-1 

90 IF ST = 13 THEN Y = Y+1 

100 IF ST = 9 THEN X = X-1: Y = Y+1 

110 IF X>158 THEN X= 159 

120 IF Y>94 THEN Y=95 

130 IF X<1 THEN X=0 

140 IF Y<1 THEN Y=0 

150 COLOR 1 

160 PLOT X, Y 

170 FOR DELAY = 1 TO 5 : NEXT DELAY 
180 COLOR 0 

190 IF STRIG (0) = 0 THEN COLOR 1 
200 PLOT X, Y 
210 GOTO 20 

NOTE: You will only draw when the Joystick button is pressed down, 
and you can also erase lines by retracing them without holding the button 
down. 

Keep in mind that you can write programs using more than one 
Joystick as long as you refer to them properly. 



STICK (0) STICK (1) STICK (2) STICK (3) 

STRIG (0) STRIG (1) STRIG (2) STRIG (3) 
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Using the Paddle Controllers 



Very Important Issue —Why are these things called Paddle Controllers? 
They are called Paddle Controllers simply because they are similar to the 
controllers used on the first Video Game “PONG”; hence (Ping Pong)— 
Paddle Controllers. You will find, however, that these have many uses 
besides game control. 

Programming with the Paddle Controllers is similar to programming 
with the Joystick except instead of interpreting 9 positions from the 
Joystick the computer will recognize Paddle position from 1 to 228. To 
see this in action, RUN this program and move the Paddle around. 

10 PRINT PADDLE (0) : GOTO 10 

As with the Joystick, the Paddle trigger only returns one of two 
numbers...1 = not pressed and 0 = pressed. 

10 PRINT PADDLE (0) , PTRIG (0) 

20 GOTO 10 


Let’s make some music now: 


10 X = PADDLE (0) 

20 SOUND 0,X, 10, 10 
30 GOTO 10 


166 



And how about a little bit of color and graphics... 


10 SETCOLOR 2, A, 2: COLOR 1 
20 LET A = PADDLE(0)/6.2 
30 POKE 82, A: PRINT " * * " 

40 SOUND 0, A, 10, 10 

50 IF PTRIG(O) =0 THEN SOUND 0, A, 6, A 
60 GOTO 10 


A FINAL NOTE: Don’t get caught up programmer’s creek without a 
PADDLE (0). 
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FUNCTIONS 


Functions are things that you wish the computer would do 
automatically...and it does! 

Four function calculators (called “four bangers”) perform addition, 
subtraction, multiplication, and division. 

More complex calculators have more automatic functions such as 
square root and percentage. Small computers, however, are easily 
capable of creating almost any function or subroutine as it is needed. 
Only some of the more complex and frequently used functions are 
included in the ATARI BASIC Instruction Set. 

All of the ATARI BASIC functions, including trigonometric 
functions are described in the ATARI BASIC Reference Manual, and you 
should consult that before you attempt any sophisticated mathematical 
programs. 

What is presented here is a general introduction to some of the 
functions you might use when first learning BASIC. 

Some functions or automatic routines you may find useful or 
interesting are... 


INT, RND, SQR, ASC, CHR$, and LEN 


INT 


INT stands for INTEGER. This function gives you a whole number 
instead of a fraction or decimal number. It always rounds the number 
down to the nearest whole number. You use INT as follows... 

(The number goes inside the parentheses.) 

PRINT INT (5. 2340) would give you....5 

print INT (9/2) would give you a 4 instead of a 

4.5 
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You might be wondering why you would want to round your numbers 
off since it’s not much extra work for the computer to keep them exact, 
here’s a few reasons: 

The average house has 23.212 
windows. Your car gets 29.17934 
MPG. And, of course, the old 
standard...The average American 
has 2.5 children. 

This is the type of information people are used to getting from 
computers and although it may be accurate from a mathematical 
standpoint, it can make you and your computer sometimes sound silly. 
INT helps keep simple issues simple. 

Also, you can check to see if a number is odd or even by using INT. 
Consider the following... 

10 INPUT X 

20 IF X/2 — INT (X/2) THEN PRINT "YOUR NU 
MBER IS EVEN" 

Let’s say X=9. In that case, X/2 would = 4.5 but INT(X/2) would = 4 
because 4.5 is rounded down to 4 and the computer would not print 
“YOUR NUMBER IS EVEN.” 


Don’t believe me, ask your computer. 


10 PRINT "V : PRINT "TYPE IN A NUMBER A 
ND PRESS RETURN" 

20 INPUT X 

30 IF X/2 = INT (X/2) THEN PRINT "YOUR NU 
MBER IS EVEN" : FOR DE = 1 TO 400: NEXT DE: 
RUN 

40 PRINT "THAT ' S ODD. . . TRY AGAIN" : FOR 
DE = 1 TO 400 : NEXT DE : RUN 


You will find additional uses for the INT function including using it in 
conjunction with the RND function. 
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RND 


RND stands for “RANDOM NUMBER”. A number which is random has 
the same chance of coming up, or being picked, as any other number. 
After a number is selected, it gets put back into the hopper. It could get 
selected immediately or not for a long time. It is truly the luck of the 
draw. 

There are two ways to get random numbers with the ATARI 
computer—one easy way is to PEEK a location which produces random 
numbers between 0 and 255, and the other is to use the RND function to 
create your own. 

First use the PEEK method. 

10 X = PEEK (53770) 

20 PRINT X: GOTO 10 


Run this to see the results. 
Now hit it maestro...add 

15 SOUND 0,X, 10, 10 


The random numbers you PEEK are easy to use, but they are not as 
flexible as those you can get by using the RND function. 


X=INT(RND(0)*10)+1 


\ 


INT makes it This never 
a round changes, 

number. 


Put the 
highest ran¬ 
dom number 
you want 
here. 


This gets rid of the 
zero and makes a 10 
possible because the 
INT function would 
round a number such 
as 9.89984372 down 
to a nine. 


Try this... 


10 X = INT (RND (0) *10) + 1 
20 PRINT X 
30 GOTO 10 
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Now change line 10 to ... 

10 X= INT (RND(O) *1000) +1 

In this simple game, the computer picks a number between 1 and 25 and 
you try to guess it. 

10 PRINT "V : POKE 752, 1 
20 X= INT (RND (0) *25) + 1 
30 PRINT "I'M THINKING OF A NUMBER BET 
WEEN 1 AND 25. . GUESS THE NUMBER AND PR 
ESS RETURN" 

40 POSITION 18, 11: INPUT G 

50 IF X = G THEN GOSUB 80: POSITION 16, 7: 

PRINT "CORRECT! " : FOR Z = 0 TO 254 STEP 2 
: POKE 712,z:SOUND 0, Z, 10, 10: NEXT z: RUN 

60 IF X>G THEN POSITION 10, 7: PRINT "TO 
0 LOW. . .TRY AGAIN! " : POSITION 18, 11: PR 
INT " " : GOTO 40 

70 IF X<G THEN POSITION 10, 7: PRINT "TO 
OHIGH. . .TRY AGAIN! ": POSITION 18, 11: PR 
INT " " : GOTO 40 

80 POSITION 10, 7: PRINT " 

":RETURN 

programming fora 
couple of days James. 

I'm noticing that there 
are a number of functions 
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SQR 


The SQR function gives you the SQUARE ROOT of a number... 

It’s used like this... 

PRINT SQR (100) would give you 10 

PRINT SQR (25) would give you 5 

Remember, you don’t use SQR to square a number. Instead you use 
the following: 

PRINT 10*2 This gives you 99.99999998 

or 

PRINT 5*2 which gives you 24.9999993 


NOTE: All computers use different formulas for squaring numbers. If 
you need to have an exact SQUARE, you can increase the squared 
number by adding .5 so it is raised up to the next highest whole number. 
Then, use the INT function to round it down to a whole squared number. 

10 PRINT : POKE 752,l: PRINT "TYPE IN 
THE NUMBER YOU WANT TO SQUARE AND PRE 
SS RETURN" 

20 INPUT X: POSITION 7, 11: PRINT "THE SQ 
UARE OF "; X; "IS. . . INT ( (X*2) +0. 5) 

30 FOR DE = 1 TO 700: NEXT DE: RUN 


ASC and CHR$ 

For every letter, number, and character on your ATARI Computer 
keyboard, there is a code number. For the standard numbers and keys, 
the code is a computer industry standard ASCII. (Pronounced Ass ke) 
For the special characters found on the ATARI Computer, an 
extended version of ASCII code is used. This is referred to as AT ASCII 
which is simply an abbreviation for ATARI-ASCII. 
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To see the code for the letter A, type... 


PRINT ASC ("A") 

You should get a 65 when you press RETURN. And if you type... 

PRINT CHR$ (65) 

You should get the letter A. 

(This instruction tells the computer to PRINT the “character string” 
for the ASCII code #65.) 

PRINTER NOTE: Since some of the codes are special to the ATARI 
Home Computer, it is usually not possible to print the entire list of CHR$ 
equivalents on most computer printers. 

On your computer screen, however 

(Any let ter or character goes her e.) 

PRINT ASC (“ *”) will give you the code number 
and 

(Any number from 0 to 255 goes her e.) 

PRINT CHR$ ( ^ ) will give you the character represented by the code #. 

To see (and hear) all of the code numbers and characters available, 
use the following program. 

10 FOR Z = 0 TO 255 
20 PRINT CHR$ (Z) 

30 NEXT Z 

Did you notice that one of the code #’s rang the bell of the 
computer...Namely CPIR$(253) 

Try this maddening program... 


10 PRINT CHR$ (253) : GOTO 10 
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In order to type on the keyboard and get the code # first and then 
display the CHR$, use the following program... 

10 GRAPHICS 2 + 16: PRINT #6; "SIMPLE TOUC 
H TYPING TUTOR" 

20 OPEN #1, 4, 0, "K: " 

30 GET #1,X 
40 POSITION 9,5 
50 PRINT #6; CHR$ (X) 

60 SOUND 0, 30, 10, 4: FOR DE= 1 TO 75 : NEXT 
DE: POSITION 9,5: PRINT #6; " SOUND 0, 

0, 0, 0 
70 GOTO 30 

NOTE: PRINT CHR$(34) will print quotes on the screen 
and 

ASCII codes can be used to alphabetize words. The upper-case (capital) 
A is equal to 65, B=66, etc. 

LEN 

LEN will tell you how many characters there are in a string 
variable...PRINT LEN (A$) 

10 DIM NAME$ (20) : PRINT "WHAT IS YOUR F 
IRST NAME? " : INPUT NAME$ 

20 PRINT "THERE ARE " ; LEN (NAME$) ; " LET 
TERS IN YOUR FIRST NAME" 

or you can use LEN to center outputs... 

5 PRINT "V" : POKE 752, 1 

10 DIM NAME$ (30) : PRINT "WHAT IS YOUR F 

IRST AND LAST NAME? " : INPUT NAME$ 

20 PRINT : POSITION (40-LEN(NAME$))/ 

2,11: PRINT NAME$ 

30 PRINT : POSITION 15,13: PRINT "IS CEN 
TERED" 

40 GOTO 40 

NOTE: For more information on ATARI Computer functions, be sure to 
check the ATARI BASIC Reference Manual. 
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ERROR Messages 


This is a limited view of the most common ERROR messages. Consult. 
The ATARI BASIC Reference Manual and the ATARI DOS II Manual 
for complete details. < 

Common ERROR Messages 

Error # Probable Causes Some Solutions 

2 Not enough Ram memory. • Get more RAM 

• Learn how to program more 
efficiently 

• Learn assembly language 






Some Solutions 


# Probable Causes 

Value ERROR. You tried to • Don’t do that. 

do something like put a 

negative number into a 

sound statement or divide by 

zero. 

Too many variables, you are • Cut down on variables 
limited to 128. • Use ARRAYS. 

Out of data ERROR. You • In case of the former, c 
did not have a proper flag in a flag and check for it. 
your data statement. Or, if • In case of the latter, let; 
you were given an ERROR not care—it doesn’t hui 

6 without a line #, you anything, 

pressed RETURN when the 
cursor was on top of the 
READY on the screen. 

Program line number • Back off! 

greater than 32767 

Bad INPUT. 

Are you INPUTing numeric • Check and correct, 
or string variables? 

ARRAY or String ERROR. • DIMension your string! 
Variable was reDIMensioned arrays and matrices in I 
or never DIMensioned. Or beginning of your prog 

ARRAY DIMension was and don’t loop back ov 

too large, e.g. DIM A(5780) them with a GOTO. 

Line not found. Did you • Don’t refer to a line thn 

change your line numbers doesn’t exist, 

and f orget to change the 
GOTOs AND GOSUBs? 



Error # Possible Causes 


Some Solutions 


13 No matching FOR even 
though a NEXT was 
encountered. 

16 RETURN ERROR 


130 Device specified is non¬ 
existent or not hooked up. 


138 DEVICE TIME OUT. This 
can occur for a number of 
reasons and can occasionally 
be very frustrating. 

139 Device NAK. (Device 
nonacknowledgement) 


141 Cursor out of range. You 
have cursed too much or 
drawn, or positioned out of 
range of your present 
graphics mode, e.g., in 
Graphics 3, you cannot 
PLOT 45,20 and in Graphics 
2, you cannot POS 2,15. 

143 Checksum ERROR. 

(Something-did-not-work= 

ERROR.) 


• Look for the FOR statement 
or an unnested loop. 

• You might have deleted a 
GOSUB and left in the 
RETURN. 

• Check to see the appropriate 
peripherals are properly 
connected to the computer. 

• Connect any unconnected 
cables. Turn “ON” any 
“OFF” devices. With cassette 
programs, rewind cassette 
and try again. 

• Un-NAK the Device. Look 
at your ERROR 138 
instructions and try again. 

• This one will get you every 
time. Keep checking and 
you’ll probably find you have 
overextended yourself. 


• With the cassette, rewind 
cassette and try again. 
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# Possible Causes 


Some Solutions 


Problems reading or writing 
on diskette. 


Not enough RAM for your 
graphics mode. 

File not found. Did you spell 
it right? Or... did you have a 
(•) between the file name 
(program name) and the 
extender? Or the wrong 
diskette? 


• Check to see that you don’t 
have a write-protect tab on 
your diskette. Try RUNning 
the program again; your 
drive might be slightly 
incompatible with your 
diskette. 

• Don’t use this graphics mode 

• See ERROR #2. 


• If you have a disk, type DOS 
RETURN A RETURN 
RETURN (Check spelling of 
file.) Type B RETURN 

• Try RUNning the program 




Conclusion 


I have tried with this book to include only the necessary, fun or 
interesting. Because of the nature of the subject, however, I suspect I 
have left out some of the former and know I have left out heaps of the 
latter. Hopefully, I have whetted your appetite by helping you nibble on 
some of the capabilities of the ATARI Home Computer. 

There are many fine books and articles currently being published on 
such ATARI Computer features as display list interrupts, fine scrolling 
and player-missile graphics. These are not easy subjects to master, but if 
you were patient enough to successfully master what was presented here, 
dive in! 





Accumulators, 51 
Addition, 12 
Arrays, 66 

Arrow symbol in quotes, 64 
ASC, 172 
ASCII, 172 
ATARI key, 10 


BOOT ERROR, 6 
Boxes, 80 


CAPS LOWER key, 10 
Cartridge, BASIC, 2 
Cartridge insertion, 5 
Channel 2-3 switch, 6 
Character string, 173 
CHR$, 172 
Circles, 103 
Clearing screen, 64 
Colon, use of, 28 
Color 

Default, 114 

GRAPHICS modes 3-8, 123-126 
POKEing, 140-142 
Registers, 113-127 


SETCOLOR and POKE equivalent 
chart, 143 
GTIA, 150 

Color instruction, 123 
Comma 
use of, 29 

not using with large numbers, 36 
CONTROL key, 37 
Counters, 51 
Cursor, 37 
Turning off, 65, 136 
Moving with arrow keys, 37 

DATA, 60 
Delay loop, 47 

DELETE BACK space key, 9 
Deleting words, 37-39 
Direct mode, 15 
Division, 13 
Dots, making them, 81 

END, 24 

Erasing lines, 18 

Error messages, 30-32, 175-178 

Execution, mathematical order of, 35 

Exponentiation, 35 




Flag, 61 
FOR, 45 

FOR/NEXT nesting loop, 48 
FOR/NEXT step, 46 
Functions, 168-174 


GOSUB, 57 
GOTO, 50 
Graphics 

Beginners’ tips, 101-102 
Characters, 79 
GRAPHICS 1, 84-85 
GRAPHICS 2, 86-87 
GRAPHICS 3-8, 95-100 
GRAPHICS 9, 156 
GRAPHICS 10, 158 
GRAPHICS 11, 159-160 
Graphics charts 
Mode 0, 83 
Modes 1 and 2, 91-94 
Modes 3-8,104-111 
Modes 9-11,155 
Greater than, 53 
GTIA, 150-160 
GTIA chart, 155 


IF/THEN, 52-55 
Immediate mode, 15 
INPUT, 44 

Inserting words, 37-39 
INT, 168 
Integer, 168 
Inverse video, 10 
in GRAPHICS 1 and 2, 119-121 


Joystick instructions, 161-165 


Keyboard, basic layout, 9 


Less than, 53 
Lines 

Duplicating, 49 
Maximum length, 18 
Line numbers 
Erasing, 18 

General information, 17 
In programming mode, 16 
Replacing with new lines, 18 
LIST, 21-22 
Logo key, 10 
Lower-case letters, 10 
LPRINT, 23 


Matrix, use of, 71 
Memo pad, 6 
Multiplication, 13 


Nesting, FOR/NEXT Loop, 48 
NEW, 25 
NEXT, 45 

Numbers—math tips, 33-36 


O’s, confusion with zeros, 8 
ON/GOTO, 56 
OPTION key, 138 


PADDLE (0), 166 
PADDLE controllers, 166 
Parentheses, mathematical use of, 35 
PEEKing, 134 
POKEing, 132-133 
Colors, 140-149 
POSITION, 26, 77-78 
In GRAPHICS 1 and 2, 88-90 
PRINT, 11 
Printing 

Inside quotes, 14 
On paper, 23 
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PRINT “ f,” 64 
Programming Mode, 15 
PTRIG (0), 165 


Quotes, 10 

Printing on the screen, 174 


Random numbers, 170 
READ/DATA, 60 
Ready, 11 
Recorder 
410 program, 137 
Turning on and off, 137 
REMark, 20 
RESTORE, 62 
RETURN, 57 
RETURN key, 9 
RND, 170 


SELECT key, 138 
Semicolon, use of, 29 
SETCOLOR, 113 
In Graphics 1 and 2, 119 
Sixteen, adding to GRAPHICS Mode, 
89 

SOUND, 128-131 

Squaring a number, 35, 172-173 


Square Root, 172 

SQR, 172 

START key, 138 

STEP, FOR/NEXT loops, 46 

Steppers, 52 

STICK (0), 161-163 

Stopping program temporarily, 49 

STRIG, 164 

Subroutines, 57-58 

Subtraction, 12 

Switchbox, 6 

SYSTEM RESET key, 9 


Text window, 84 
Tab width, changing, 135 


Variables, 40-43 
Assigning values, 41 
DIMensioning strings, 43 
Numeric, 42 
String, 42 


Zeros 

Confusion with O’s, 8 
Used with POSITION, 27 
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